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0. EinfUhrung 


Der Sortierprogramm-Generator (SPG) ist ein Systemprogramm vom Typ 1, 
das von der Karte .SPG angerufen wird. Es gibt zwei Versionen: eine 
Systemband-Version zur Verwendung im ETOS und eine Systemplatten- 
Version zur Verwendung im EDOS, 


Fur beide Systeme ist folgende Mindestkonfiguration erforderlich: 


- Kernspeicher 12 K 

- Kartenleser oder Leser/Stanzer 

- Drucker 

- Systemband und 2 Arbeiisbander oder 


- eine Systemplatte. 


Bei der Bandversion missen die Bandstationen zum Schreiben 9-spuriger 
Bander eingerichtet worden sein, 


Der SPG arbeitet auf einem Ursprungsprogramm, das vom Benutzer zur 
Verfiigung gestellt wird. Dieses Programm kann entweder in Lochkarten 
stehen oder auf Band bzw. Platte, je nach der Version des SPG. Das 
Programm enthalt Befehle in der SPG-Sprache und auf Wunsch eine zustitz~ 
liche APS-Kodierung, die der Benutzer erstellt. 


Der SPG liest und listet das Ursprungsprogramm und fuhrt eine Format- 
kontrolle durch, Wenn die Prifungen positiv ausfallen, wird ein Sortier- 
oder Mischprogramm erstellt, das aus nicht-umgewandelten APS-Befehlen 
120/130 besteht, dann wird dieses Programm auf Band oder Platte ge- 
speichert gema8 der Forderung des APS-Assemblers: 


- entweder auf das Arbeitsband 1 hinter die zwei Kennstitze in Blécken 
von 85 Zeichen, davon 5 fur die Blocknummer und 80 fur das APS- 
Kartenbild; 


- oder auf die Ausgabeplatte im 8-Bit-Modus, mit 3 APS-Kartenbildern 
in den ersten 240 Positionen aller benutzten Sektoren mit evtl. Ausnahme 
des letzten Sektors. 


Im zweiten Falle wird das Programm vom Anfang des 4. Zylinders der 
ersten freien Zone an gespeichert, wenn eine Arbeitsplatte vorliegt, 
andernfalls von einer variablen Position in der freien Zone an. 


Wenn eine Arbeitsplatte vorhanden ist, werden max. je 16 Zylinder auf 
der Systemplatte und auf der Arbeitsplatte fur die Kompilierung bendtigt: 
andernfalls sind max. 26 Zylinder auf der Systemplatte erforderlich. 
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Das kompilierte Sortier- oder Mischprogramm, das vom Generator aus- 
gegeben wird, wird mit Objektprogramm bezeichnet. Es besteht aus 
einem Hauptprogramm und zusitzlichen Sektionen und wird in 12 Seg- 
mente unterteilt. 


Das Objektprogramm muf unter dem ETOS laufen, wenn der ETOS- 
Generator benutzt wurde, unter dem EDOS, wenn der EDOS-Generator 
benuizt wurde, obgleich die Konfigurationen abweichen kénnen. Der 
Generator benutzt immer die Mindestkonfiguration, wihrend das Objekt- 
programm alle angegebenen Miglichkeiten benutzt. 


Oo 
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1, Objektprogramm 
11. Arten der Objektprogramme 


Es gibt drei Hauptarten von Objektprogrammen, die generiert werden 
kénnen: Sortierprogramme auf Band, Sortierprogramme auf Platte und 
Mischprogramme. 


1.1.1. Sortierprogramme auf Band 


Die Sortierpragramme auf Band erstellen aus unsortierten Daten eine voll- 
stindig sortierte Datei. Zwischendateien werden auf Band geschrieben. 


oO Als Eingabe kénnen vorliegen: 


- 1 Banddatei 

- 1 Plattendatei 

- 1 Datei in nicht-definierter Form, die vom Benutzer bestimmt wird 
- 1 Kartendatei 

- eine der ersten drei Arien plus einer zustitzlichen Kartendatei. 


Es werden mindestens 3 Bandeinheiten fur die Aufnahme der Zwischen- 
dateien bendtigt, obwohl diese auch in den meisten Fallen fur die Ein= 
gabe oder Ausgabe benutzt werden kénnen. 


Die Ausgabedatei ist eine Datei auf Band oder Platte. 


Die Sortiertechnik nutzt die Maglichkeit des Ruckwartslesens aus, wenn 

die Magnetbandeinheiten damit ausgestattet sind, dadurch wird die Sortierzeit 

reduziert. Beide Versionen werden mit Sortieren, mit Lesen vorwarts und 
oO Sortieren mit Lesen riickwiarts bezeichnet. Es liegt kein Unterschied in 

den Programmldngen vor. 


Das Bend-Sortieren kann weiter in Sortieren auf einer Spule und Sortieren 
auf mehreren Spulen unterteilt werden. Das Sortieren auf einer Spule wird 
fur Datenmengen benuizt, die die Kapazitat eines der benutzten Arbeits— 
bander nicht tberschreiten, Das Sortieren auf mehreren Spulen wird bei 
Eingabedateien auf mehreren Spulen benutzt und ist Fur kleinere Daten- 
mengen weniger wirksam. In beiden Versionen kann sowohl vorwirts als 
auch riickwérts sortiert werden. 


oO 
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Wenn die Daten von einem Magnetband eingegeben werden, kann die Einheit 
mit der Eingabedatei auch fur eine Arbeitsdatei benutzt werden. Dieselbe 
Aussage bezieht sich auf Ausgabe auf Band, wihrend die Eingabe- und 
Ausgabedateien niemals dasselbe Arbeitsband benutzen dirfen, so daB, 

wenn sie beide dieselben Einheiten benutzen, immer zwei verschiedene 
Arbeitsdateien nétig sind. Sortierprogramme auf Band kénnen sowohl vom 
ETOS- als auch vom EDOS-Generator erstellt werden, 


1.1.2.  Sortierprogramme auf Platte 


Die Sortierprogramme auf Platte erstellen aus unsortierten Daten eine voll- 
standig sortierte Datei. Zwischendateien werden auf Platte geschrieben. 


Als Eingabedaten kénnen benutzt werden: 


- 1 Banddatei 

- 1 Plattendatei 

- 1 Datei von unbestimmter Form, die vor Benutzer erstellt wird 

- 1 Kartendatei 

- eine der ersten drei genannten Eingabedateien plus einer zustitzlichen 
Kartendatei 


Fir die Sortierung werden zwei Arbeitsdateien benétigt. Jede Arbeitsdatei 
_-= mui die Datenmenge um mindesiens 3 Zylinder tbersteigen, und es mu8 
_ maglich sein, alle Plattenstapel beider Dateien gleichzeitig zu laden. 


Oo 
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fs wird eine Datei auf Band oder Platte ausgegeben. 


Die Eingabedatei kann einige oder alle der Platteneinheiten benutzen, 
die von einer der Arbeifsdateien verwendet wird. Dieselbe Aussage ist 


fur die Ausgabedatei giltig beziiglich derselben Arbeitsdatei oder auf eine 
andere Arbeitsdatei, 


Sortierprogramme auf Platte kénnen nur vorm EDO S-Generator erstel lt 
werden. 


1.1.3. Mischdateien 


Mischdateien erstellen eine Ausgabedatei aus einer Anzahl von Eingabe- 
dateien. Es ist kein externer Arbeitsspeicher erforderlich, 
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1.2.1. 


Als Eingabe kénnen benutzt werden: 


- Banddateien 
- Plattendateien 
- Kartendatei 


Es kénnen bis zu 10 Eingabedateien benutzt werden, wovon héchstens | 
eine Kartendatei ist. 


Es wird eine Datei auf Band oder Platte cusgegeben. 


Mischdateien kénnen sowohl vom ETOS- als auch vom EDOS-Generator 
erstellt werden. 


Vergleichsroutinen 


Fur alle Vergletche zwischen den Sdtzen beim Sortieren wird nur eine 
Vergleichsroutine benutzt. Diese Routine kann von SPG-Makrobefehlen 
generiert werden, die die Positionen und die Arten der Schlussel in den 
Satzen definieren oder sie kann als eine Routine im Own=-Coding vom 
Benutzer erstellt werden. 


Generierte Vergleichsroutine 


Der Benutzer darf bis zu 16 Schlussel spezifizieren, von denen jeder 
dieselbe Position in allen Sétzen belegt, und von fester Lange sein mu. 


In den Sttzen kinnen beliebige feste Positionen als Schlussel gewahlt 
werden, von denen es drei Arten gibt: 


- Alphanumerische oder einfache bintire Darstellungen, die entsprechend 
ihrer bindren Struktur von 8 Bits verglichen werden. Der generierte Ver- 
gleichsbefehl ist ein CMC mit der maximalen Léinge von 256 Bytes. 


- Numerische Darstellung mit nicht-definierten linken Halbbytes, die 
gemaB den letzten 4 Bits jedes Byte verglichen werden. Der generierte 
Vergleichsbefehl ist ein CMQ mit der maximalen Linge von 16 Bytes. 


- Gepackte numerische Darstellungen mit Vorzeichen, die mit jedem 
Halbbyte verglichen werden, dabei wird das Vorzeichen im rechten 
Halbbyte des ganz rechts stehenden Byte berUcksichtigt. Der generierie 
Vergleichsbefehl ist ein CMP mit der maximalen Lange von 16 Bytes, 
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1.3. 


Jeder Schlusse! kann in aufsteigender oder absteigender Folge angeordnet 
werden. 


Die Schlussel kénnen im Aufbau oder in der Position voneinander unab- 
hangig sein und es kann ihnen jede beliebige Wertigkeit zugeordnet 
werden. 


Wenn die relativen Positionen zweier Sdtze bestimmt werden sollen, be- 
ginnt der Vergleich mit dem Schliissel héchster Wertigkeit. Wenn dieser 
Vergleich ausreicht, um die Folge festzulegen (d.h. die ersten SchlUssel 
sind nicht gleich), ist kein weiterer Vergleich erforderlich. Reicht dieser 
Vergleich nicht aus, werden die nachsten Schlissel verglichen usw. bis 
ein Unterschied festgestellt wird. Dann erhalt der Satz mit den kleineren 
Schlussel den Vorrang bei absteigender Ordnung baw. der Satz mit dem 
groBeren Schlussel bei aufsteigender Ordnung. 


Wenn zwei oder mehrere Sdtze dieselben Werte in ihren Schliisseln haben, 
kann ihre relative Folge bei der letzten Ausgabe nicht vorhergesagt werden; 
sie kénnen jedoch nicht durch einen Satz getrennt werden, der verschie— 
dene Werte in einem der Schlussel enthalt. 


Der Aufbau des Ursprungsprogramms erlaubt die Definition mehrerer 
Schlissel als in einem speziellen Sortierprogramm bendtigt werden, so 
daB die erforderliche Anderung, um dieselbe Datei nach verschiedenen 
Schlisseln zu sortieren, minimal ist. 


Zusatzvergleich Sektion C 


Die Own-Coding-Routine erméglicht die Verwendung nicht-standardmaBiger 
Kriterien, um die Satzfolge zu definieren. Wenn das Hauptobjektprogramm 
die relative Folge zweier Sitze wissen will, wird der vorrangige Satz von 
der Sektion C durch Einstellung der Indikatoren UF/OF und ZE/NZ bestimmt. 


Eingabedateien 


In dieser Sektion werden die Media und die Formate fiir Eingabedateien 
beschrieben sowie die Standardverfahren zur Druckaufbereitung, die vom 
Hauptprogramm angewendet werden kénnen und die Benutzung der 
Own-Coding-Routine in der Eingabephase. 
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1.3.1. Dateiformat 


a) 


b) 
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Banddateien 
Zur Aufnahme von Eingabedateien auf Band dienen: 


- Bandeinheiten mit standardmaBigen Stevereinheiten, auf denen 
ruckwéurts gelesen werden kann, es wird in 7- oder 9-Spuren oder 
phasenmoduliert geschrieben. 


= Bandeinheiten mit standardmaBiger 7-Spur-Stevereinheit und ohne 
die Méglichkeit riickwérts zu lesen. 


Wenn die Datei mit ? Spuren geschrieben wird und eins der Zeichen 
nicht zum Druckzeichensatz gehért, ist es nicht méglich, 7-Spur- 
Bander oder Plattendateien im 6-Bit-Format fur Arbeits- oder Ausgabe~ 
dateien zu benutzen, 


Die Datei kann aus mehreren Spulen bestehen. 


Der Datei kann eine Einheitennummer von 1 - 8 oder von A = H zuge- 
ordnet werden, Bei der Eingabe aus mehr als einer Spule missen "alternate 
unit" (Wechselstation) oder "multi-reel" (Mehrfachdatei) benutzt werden. 
Bei Sortierprogrammen auf Band wird die Moglichkeit der Wechselstation 
nicht empfohlen. 


Eine Eingabedatei auf Band fir das Sortieren kann einen nicht-standard- 
ma&Bigen Kennsatz haben, vorausgesetzt, dal sie mit der Own-Coding- 
Routine ertffnet wird (Zusatzsektion H); vorausgesetzt ist standardmaBiger 
Aufbau in den anderen Aspekten oder der Aufbau mu8 durch die Own-Coding- 
Routinen in der Zusatzsektion | standardmaBig gemacht worden sein. 


Die Sdtze kénnen von fester oder variabler Lange sein mit einer be- 
liebigen Anzahl von Sdizen in einem Block bzw. die Datei kann un= 
geblockt sein. D.h., daB jeder Block einen Satz enthilt, dessen 
Lange gleich der BlockgréBe ist. 


Plattendateien 


Eine Platteneingabedate! mu@ auf einer oder mehreren DSU 160 als 
Teil des DSS 161-Untersystems stehen. Die Datei kann im 6-Bit- oder 
8-Bit-Modus geschrieben sein. Bei Verwendung des 8-Bit-Madus ist 
die Verwendung von Plattendateien mit 6-Bit-Modus oder Banddateien 
mit 7-Spur-Modus fiir Arbeits- und Ausgabedateien nicht méglich, 
wenn eines der Ausgabezeichen nicht zum Druckzeichensatz gehart. 
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Der Platteneingabedatei kann die Nummer 0 - 9 oder A - F zugeordnet 
werden. 


Wenn die Datei auf mehr als einer Platte steht, kann die Méglichkeit 
"Alternate Unit" benutzt werden. 


Der Aufbau der Datei kann sequentiell oder indiziert-sequentiell fur 
alle Programme sein, wihrend der Random-Aufbau nur fur das Sortieren 
zulassig ist. 


Bei einer indiziert-sequentiellen Datei wird der Index nicht adressiert. 


Plattenpages konnen aus Sdtzen fester oder variabler Lange gebildet a) 
werden bzw. sie sind ungeblockt. In diesem Falle enthalt fede Page 
einen einzelnen Satz, dessen Linge der PagegréRe entspricht. 


Wenn die Datei eine Overflow-Zone enthilt, kann sie von der letzten 
Ausgabe ausgeschlossen werden, Ist die Overflow-Zone in einem Sortier- 
programm zu bearbeiten, wird diese Datei seriell nach der primiren 

Zone gelesen. Beim Mischen wird diese Datei in der Sequenz gelesen, 
die vom Verkettungsfeld definiert worden ist. 


c) Dateien auf nicht-definierten Datentriigern 


Diese Méglichkeit gestattet die Eingabe von Daten auf einem Daten- 
trager, fur den die Standardmiglichkeiten nicht vorgesehen sind. 


Die Datei kann jede beliebige externe Form haben; der Benutzer mu8 

jedoch die in Biécken zu sortierenden Daten in Sdtzen fester oder 

variabler Lange eingeben und die Datei eréffnen und abschlieBen. Od 
Diese Funktionen missen durch die Own-Coding-Routinen in der 

Zusaizsektion | ausgefuhrt werden. 


d) Kartendateien 


Eine Kartendatei besteht aus einem Kartenstapel ohne Standardidentifi- 
kation am Anfang und endet mit der Karte JEND. 


Jede Karte enthalt einen Datenblock, der auf beliebigen festen Spalten 
beginnt und endet. Die Stitze, die den Block bilden, beginnen und 
enden immer in festen Spalten. Die Stitze folgen ltickenlos aufeinander. 
Der erste vollstiindig nicht gelochte Satz in einer Karte bezeichnet das 
Ende eines Blockes. 


Oo 
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Die einfache Karteneingabe fur Sortierprogramme hat immer feste Linge. 
Eine sekunddre Karteneingabe fir Sortierprogramme wird in die Form 

des ersten Mediums (sofern dieses abweicht) umgewandelt, entweder 
durch die Zusatzsektion | oder durch Aufbereitungsverfahren. 


Die Karteneingabe fur Mischprogramme, die in der Form von den 
anderen Eingabedateien abweicht, wird durch die Prozeduren der 
Druckaufbereitung umgewandelt. 


Gemischte Eingabe 


Bei der gemischten Eingabe werden primare Dateien auf Band, Platte 
oder einem nicht-definierten Medium und eine sekundire Datei auf 
Karten eingegeben. Die Sdtze beider Dateien mUssen von derselben 
festen Lange oder von der variablen Linge mit unterschiedlichen 
kleinsten und gréBten Lingen sein. Die Schlussel missen dieselbe 
Position relativ zum Satzbeginn annehmen. 


Diese obengenannten Regeln beziehen sich auf Mischprogramme fur die 
bis zu 10 Dateien auf Band, Platte oder Karten mit héchstens einer 
Kartendatei angegeben werden konnen. Nicht-geblockte Eingabe ist 
miglich, wenn alle Eingabedateien auf Band stehen, oder wenn alle 
auf Platte mitderselben Page-Liinge stehen. 


Die Einschrankungen beziehen sich nur bei Sortierprogrammen auf die 
Form nach der Anderung durch die Zusatzeingabesektion, die benutzt 
werden kann, um die Eingabedaten zu normalisieren. 


1.3.2.  Aufbereitungsverfahren 


oO Fur die Aufbereitung werden standardmaBige Sektionen benutzt, die auf 
Verlangen in das Objektprogramm Ubernommen werden. Liegt mehr als 
eine Eingabedatei vor, kénnen diese Optionen unabhiingig voneinander 
auf jede Eingabedatei angewendet werden. 


a) 


b) 


° 
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Blocknummer 


Die ersten 5 Zeichen jedes Blockes der Banddatei kénnen die dezimale 
Blocknummer enthalten, deren Folge vom Hauptprogramm geprift wird. 


Startfeld 


Dateien, die auf Band oder auch im nichtdefinierten Medium stehen, 
kénnen mit einem Feld fester Linge beginnen, das ignoriert wird. 
Wenn numerierte Bandblécke angegeben worden sind, stehen die 
ersten 5 Zeichen nicht in dem Feld, 
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¢) Overflow-Zone 


Bei der Eingabe aus einer Plattendatei kénnen auf Anforderung alle 
Daten in der Overflow-Zone ausgeschlossen werden. 


d) Léschen von Sétzen 


Ein Druckzeichen oder ein anderes Zeichen aus 8 Bits kann zusammen 

mit einer festen Position relativ zum Beginn des Satzes spezifiziert 

werden,und eine von vier Operationen kann gewahlt werden, die 

standig auf alle Sdtze in der Datei angewendet wird, Die méglichen 
Operationen sind Léschungen gemif der Beziehung zwischen dem 

Inhalt der spezifizierten Position und dem 8-Bit-Kriterium. Geldscht 

werden kann: wenn sie gleich sind, wenn sie ungleich sind, wenn das oO 
Kriterium gréfer ist, oder wenn das Kriterium kleiner ist; der Vergleich 

erfolgt immer durch einen einfachen CMI-Befehl. 


e) Verdichten von Sétzen 


Die Sdtze einer Platteneingabedatei kénnen bei der Ausgabe zu einer 
Datei auf Band oder Platte mit Adressen oder Adressen plus Schlussel 
reduziert werden. Die Adressen belegen die ersten oder nur 8 Zeichen 
und enthalten die dezimalen Plattenadressen, aus denen die Sdtze 
entnommen wurden, Falls vorhanden, folgen die Schlussel unmittelbar 
darauf in der Reihenfolge threr Wertigkeit und belegen aufeinander=- 
folgende Zeichen, Diese Méglichkeit bezieht sich nur auf Sortier- 
programme und ist nicht zuldssig, wenn eine zustitzliche Kartendatei 
vorliegt. 


Die dezimale Kartenadresse lautet: 


Zeichen } Folgenummer des Datentrigers 
Zeichen 2-6 Sektoradresse der Page (CCCTS) 
Zeichen 7 - 8 Satznummer innerhalb der Page 


f) Verkleinerung der Satzlinge 


Die Sttze kénnen durch Streichung einer fester Anzahl! von Zeichen 
am Ende des Satzes verkUrzt werden. Diese Aussage gilt fur Sdtze 
fester oder variabler Lange, wobei die Satzldnge der Sdtze variabler 
Lange automatisch fortgeschrieben wird. 
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g) Léschung des Verkettungsfeldes 


Erfolgt die Eingebe auf Magnetplatten und die Ausgabe auf Magnetband, 
so kann der Benutzer das Léschen des Verkettungsfeldes fordern. 


h) Obligatorisches Aufbereitungsverfahren 


Stitze variabler Lange, die kleiner als der Mindestwert fur die primire 
Datei sind, werden durch Anfiigen von Leerzeichen rechts auf diesen 
Wert vergréGert. Sdtze variabler Lange, die gréBer als der maximale 
Wert der primaren Datei sind, werden durch Eliminieren der Zeichen 
von rechts auf diesen Wert reduziert. 


1.3.3.  Zusatzsektion H fur die Dateieréffnung 


In der Own-Coding-Sektion mu8 die Eréffnung einer Eingabedatei auf Magnet- 
band zum Sortieren mit nicht-standardma(igen Kennstitzen vorgesehen 

werden, Der Zugriff auf die entsprechende Dateitabelle ist erlaubt, und der 
Benutzer muB alle Operationen, um normales Lesen der Datei zu ermig- 
lichen, ausfthren, Die Anfangskennsttze fur. die folgenden Spulen der 

Datei missen normale Kennsiitze sein, 


1.3.4.  Zusatzsektion [ fur die Eingabe 


Diese Sektion darf nur in Sortierprogrammen auf Band und Platte benutzt 
werden und bestehi aus bis zu 7 Own-Coding-Routinen, in die auf feste 
Eingabephasen gesprungen wird. Bei gemischter Eingabe werden fur beide 
Dateien diesetben Angaben gemacht. 


a) Nach der Eréffnungsphase des Hauptprogramms mu8 der Benutzer die 
Eingabedatei auf einem nicht definierten Medium erdffnen, und die 
Initialisierung anderer Routinen in dieser Sektion kann ausgefthrt 
werden, 


b) Nach dem erneuten Starten mu8 der Benutzer eine Datei auf einem 
nichtdefinierten Medium oder eine Banddatei mit einem nicht- 
standardmaBigen Kennsatz erneut einstellen. 


¢) Nach jedem Eingabetibertrag eines Bandblockes einer Platten-Page 
oder einer Karte kann der Benutzer die Daten annehmen oder zurtick- 
weisen bzw. die Daten zurlickweisen und den Rest des Datentrigers 
(Band und Platte) oder der Datei (Band, Platte und Karte). Bei An- 
nahme der Daten kann deren Lage geiindert und die Lange kann bis 
zur BlockgréRe fur die Datei vergréBert werden, 
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. Die externe Form der Daten wird nicht getndert. Dagegen werden 
Pages aus einer Overflow-Zone, die ignoriert werden sollen, nicht 
dargestellt und die Folge der Bandblécke mu schon getestet worden 
sein. 


Der Benutzer mu die Daten in dem Format belassen, das fUr die Datei 
bei Platten- oder Banddateien definiert worden ist, oder in der extern 
definierten Form fur Kartendateien. 


Bemerkung: 


Wenn eine Datei Standardkennstitze und ein externes Standardformat 


hat, ist diese Routine nicht erforderlich. oO 


d) Nachdem jeder Satz einer beliebigen Eingabe aus dem Block entnommen 
worden ist, kann der Benutzer den Satz annehmen oder zurtickweisen 
bzw. den Satz zuriickweisen und den Rest des Datentrigers (Platte oder 
Band} oder die Datei (auf allen Medien). 


Steht der Satz in Lochkarten, wird er in seiner externen Form fester 
Linge dargestellt und der Benutzer mu8 ihn auf die interne Form ver- 
langern oder verkiirzen, falls er von der angegebenen Lange abweicht. 
Fehlt diese Routf ne, werden die Abweichungen im Aufbau von der 
Routine fur die Endung der Lange bearbeitet. 


Wenn der Satz nicht von Karten angegeben wurde, mu8 er schon 

* die spezifizierte interne Form haben, die erforderlichenfalls in der 
vorhergehenden Routine erstellt wird (siehe ¢.). In dieser Routine 
jedoch kann der Satz beliebig innerhalb der Grenzen der angegebenen 
internen Form gedndert werden, Die Anderungen (wozu auch Liéngen~ 
&nderungen fur Sétze variabler Lange gehdren kénnen) werden direkt (-) 
ausgefthrt, 


Die Optionen zur Aufbereitung mUssen vor dem Sprung in diese Routine 
ausgefuhrt worden sein: 


- Ignorierung des Startfeldes 
- Léschen von Sdtzen geméB einem speziellen Zeichen 
- Verkleinerung der Satzlange 
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Optionen zur Druckaufbereitung die unmittelbar danach ausgefuhrt 
werden: 


- Verdichten der Sétze 
- Léschen des Verkettungsfeldes 
- Zwangsweise Lingendnderung 


e) Bet Wechsel des Datentréigers der Bandeingabedateien steht der End- 
kennsatz vor dem AbschlieSen des Datentrigers fur die Kontrolle zur 
Verflgung. 

e 

f) Beim Wechsel des Datentrtigers fUr gemischte Medien mu der Benutzer 
einen Indikator setzen, wenn die Operationen, die durch andere 
Routinen in dieser Sektion auf die Kartendatei ausgefthrt wurden, 
von den Operationen in der primdren Datei abweichen, Die primére 
Date? wird vollsttindig gelesen, bevor die Kartendatei gelesen wird. 


g) Zum Anfordern eines Blockes aus einem nicht-definierten Medium 
stattet der Benutzer das Hauptprogramm mit einem Datenblock aus 
oder gibt an, dafS Ende der Datei erreicht worden ist. Die Form des 
Blockes muf dieselbe sein, wie sie fur die Datei definiert worden 
ist, bevor eine der Prozeduren fur die Druckaufbereitung angewendet 
wird. 


Arbeitsdateien 


Fur Mischprogramme sind keine Arbeitsdatefen erforderlich, Sortier— 
programme auf Band und Sortierprogramme auf Platte werden durch die 
Benutzung von Band und Platte als Arbeitsmedium charakterisiert. Das Ver- 
fahren ist fur das Sortieren auf Band und Platte unterschiedlich. 


Arbeltsdateien fur Sortierprogramme auf Band 


Die einfachste und empfohlene Zuordnung von Arbeitsdateien fur ein 
Sortierprogramm auf Band besteht aus sovielen Einheiten wie méglich 

mit der Méglichkeit des Rickwédrtslesens und des Schreibens von 9-Spuren. 
Die Bander haben Standardkennstitze und sie enthalten keine Daten oder 
Programme, die nicht Uberschrieben werden kénnen. Unter dieser Vor- 
aussetzung entsteht ein Sortierprogramm, das die Maglichkeit des RUck- 
wirtslesens verwendet und Checkpoints im ETOS und EDOS sowie die 
Option Mehrfachdatentriiger zulaft. In Sortierprogrammen mit Mehrfach= 
datentriigern mUssen alle Arbeitsdateien denselben Schreibmodus und die~ 
selbe Datendichte haben, 
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Wenn eine der Einheiten nicht die Méglichkeft hat, ruckwdrts zu lesen, 

wird ein Sortierprogramm mit Vorwirtslesen generiert: d.h., der Vorteil 

der anderen Einheiten, die auch rickwarts lesen kénnen, wird nicht aus- 
genvuizt, 


Wenn eine der Einheiten nicht 9 Spuren schreiben kann, sind die Optionen 
Checkpoint und Mehrfachdatei nicht méglich. 


Wenn eine der Dateien einen nichtstandardméGigen Kennsatz oder Daten, 

die am Anfang erhalten werden mUssen,bzw. eine andere nichtnormale 

Information enthalt# die nicht therschrieben werden kann, kénnen der 

Checkpoint (im ETOS) und die Mehrfachdatei nicht benutzt werden. 

Wenn die letzteren nicht erforderlich sind, oder wenn die Mindestanzahl der 
Arbeitsstationen (3) nicht verfiigbar ist, kann der Benutzer die Verwendung oO 
folgender nichtstandardméfiger Dateien spezifizieren: 


- Das Systemband oder das Master Tape mit dem Objektprogramm kénnen 
benutzt werden. FUr das Sortieren vom letzten Programm oder der 
letzten Subroutine an werden beide Binder benutzt, Mehrfachausgabe- 
dateien sind in diesem Falle nicht erlaubt und Mehrfacheingabedateien 
sind nur als nichtdefiniertes Medium zugelassen, Das ist in dem Fall nicht 
méglich, wenn das Systemband 7 Spuren hat. 


~ Ein Band mit nur einer Datei oder ein Plattenstapel kann nach den 
Kennsdtzen Ende der Datef oder Ende des Plattenstapels benutzt werden, 


- Es kann ein Band benutzt werden, das schon auf den Punkt eingesiellt 
ist von wo an geschrieben wird. In diesem Falle darf vor dem Einstell- 
punkt keine Bandmarke stehen, worauf ein Dateikennsatz mit den zwei 
Zeichen EO folgt, da diese Zeichen von dem Objektprogramm ge- 
schrieben werden, um den Beginn der Arbeitsdaten zu identifizieren. oO 


Die Sieverung der Arbeitsdateien im Sortierprogramm wird vom Haupt- 
programm ausgefUhrt. Die Formate entsprechen den SPG-Formaten, Die 
Blocklangen werden so berechnet, da sich die kUrzeste Sortierzeit er- 

gibt, Der Benutzer darf nicht Satz- oder Blockformate spezifizieren, die 
Dateien adressieren oder eine zusdtzliche Kodierung angeben, die sich auf das 
Lesen und Schreiben der Arbeitsdateien bezieht. 


Der Wechsel des Plattenstapels ist bei allen Arbeitsdateien ohne nicht- 
standardmaBige Daten erlaubt, obgleich er nicht empfohlen wird. Wenn 

beim Schreiben einer Arbeitsdaiei Ende des Plattenstapels festgestellt 

wird, wird eine Anweisung ausgedruckt und der Operator kann auf einen 

fruheren Checkpoint zurUckkehren, um ein langeres Band zu laden. Das 

Programm kann mit einer zweiten Spule fortgesetzt werden (wenn die 

Datenmenge fiir eine Spule zu gro8 ist) und veranlaBt spiiter im Sortier~ 

programm das erneute Laden der Spulen. Die folgenden zwei Punkte mUssen 
berticksichtigt werden: oO 
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- Wenn eine zweite Arbeiisdatei "overflows" bevor die letzte Spule 
auf der ersten Arbeitsdatei wihrend des Lesens eiiffnet worden ist, kann 
das Programm nicht fortgesetzt werden, so da® es entweder unterbrochen 
oder erneut gestartet werden mu8. 


- Beim Rickspulen und erneuten Einstellen ergibt sich ein betrachtlicher 
Zeitverlust. Wenn diese Situation einmal eingetreten ist, wird sie mit 
groBer Wahrscheinlichkeit mehrmals wiederholt werden. 


Arbeitsdateien fir Sortierprogramme auf Platte 


Es gibt Arbeitsdateien mit sequentieller, sequentiell-indizierter und 
Random-Organisation. Alle Plattenstapel missen gleichzeitig zur Ver- 
fUgung stehen und werden vom Hauptprogramm eréffnet. Die Arbeits- 
dateien missen standardmaBige Kennsttze haben. 


Die einfachste und empfohlene Zuordnung von Arbeitsdateien fur ein 
Sortierprogramm auf Platten liegt vor, wenn keine Einheit einen Platten- 
stapel beider Dateien enthalt. Die Anzahl der Plattenstapel, die von jeder 
Datei belegt wird, ist fur die Sortiergeschwindigkeit belanglos. Unter 
keinen Umstidnden kann dieselbe Zone desselben Plattenstapels zu beiden 
Dateien gehéren. Die Overflow-Zonen und die Index-Zylinder der 
Arbeitsdateien werden nicht benutzt. Die primire Zone jeder Datei, die die 
Summe aller Plattenstapel enthult, mu8 um mindestens 3 Zylinder gréBer 
sein als die Lange der Eingabedaten. Es ist kaum von Vorteil, wenn die 
Langen gréBer gewthlt werden. 


In Sttzen, die nicht von einer Platte eingegeben werden, wird ein Satz- 
code eingefiigt. Dieser Satzcode besteht aus einem Zeichen fur jeden Satz 
und mu bei der Berechnung der Arbeitsdatei berUcksichtigt werden. 


Wenn eine Arbeitsdatei eine Mehrfachdatei ist, mu im Ursprungsprogramm 
"File Extension" angegeben werden. Bei Ende der Datei wird das Programm 
unterbrochen. 


Es wird empfohlen, spezielle Plattenstapel fur Arbeitsdateien bei Sortier= 
programmen auf Platte zu benutzen, da die Anzahl der Ubertrage sehr 
groB ist und Schwierigkeiten beim Zahlen,wie oft die Dateien geschrieben 
worden sind, entstehen. 
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Die Steverung der Arbeitsdateien wird vom Hauptprogramm ausgefthrt. Die 
Formate entsprechen den SPG-Formaten und die Linge der Page wird so 
berechnet, dal sich das schnellste Sortierprogramm ergibt, Die Verteilung 
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1.5. Ausgabedateien 
Ausgabedateien kinnen auf Band oder Platte geschrieben werden ohne 
Berticksichtigung der Eingabe- oder Arbeitsmedien mit der Ausnahme, 
daB alle Mehrfachsortierprogramme auf Band auch ein Band als Ausgabe~ 
medium benutzen missen. 

1.5.1. | Datenformat 
a) Banddateien 


Es gibt folgende Einheiten zur Aufnahme von Ausgabedateien auf Band: 


- Einheiten mit standardmafigen Steuvereinheiten und mit der Méglich- oO 


keit des RUckwurtslesens; es wird auf 7 oder 9 Spuren oder mit 
Phasenmodulation geschrieben. 


~ Einheiten mit einer standardmiéiigen 7-Spur-Stevereinheit ohne die 
Maglichkeit des RUckwirtslesens. 


Ist die Ausgabedatei bei Mehrfachdateien auf Band, mu die Ausgabedatei 
denselben Schreibmodus und dieselbe Schreibdichte wie die Arbeits- 
dateien haben. 


Die Datei kann aus mehr als einem Plattenstapel bestehen. 


Die der Datei zugeordnete Einheitennummer ist belanglos und kann 
von 1 bis 8 oder von A bis H angegeben werden. Die Option Wechsel~ 
station kann spezifiziert werden, ausgenommen davon sind Mehrfach~ 
dateien auf Band, wo die Entscheidung im Objektprogramm getroffen 

witd. Diese Option wird fiir Einfachdateien auf Band nicht empfohlen, oO 
dagegen fir Sortierprogramme auf Platten und Mischprogramme. 


Das interne Format der Sétze bleibt erhalten, wenn es nicht durch 
Prozeduren der Druckaufbereitung oder durch die Zusatzsektionen O 
oder M getindert wird, 


Die Blockgréfe fur Sdtze fester oder variabler Lange ist von der 
Lange des Eingabeubertrages unabhiingig. 


Fur Programme mit ungeblockter Bandeingabe ist die ungeblockte 
Bandausgabe obligatorisch. 
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Plattendateien 


Eine Plattenausgabedatei muB auf eine oder mehrere Einheiten 
DSU 160 geschrieben werden, die Teil eines Subsystems DSS 161 
sind. Die Datei wird immer sequentiell in die primaire Zone ge- 
schrieben (Haupiplattenzone). 


Der Datei kann eine beliebige Einheitennummer von 0 - 9 oder 
A ~ F zugeordnet werden. 


Wenn die Datei gréfer als ein Plattenstapel ist, kann die Option 
Wechselstation benutzt werden. 


Das interne Format der Satze bleibt erhalten, wenn es nicht durch 
die Prozeduren zur Druckaufbereitung oder durch die Zusatzsektionen 
O oder M getindert wird. 


Die Page-GroRe fiir Satze fester und variabler Linge ist von der 
Linge des Eingabetbertrages unabhingig. 


Fir Programme mit ungeblockter Platteneingabe ist die ungeblockte 
Plattenausgabe obligatorisch. Es wird dieselbe Page-Liénge benutzt, 


1.5.2.  Druckaufbereitung 


3) 
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Blocknummer 


Sequentielle Blocknummern aus 5 dezimalen Zeichen kénnen am 
Anfang des Bandausgabeblockes gespeichert werden. 


VergréRerung der Satzlinge 


Satze fester oder variabler Lange kénnen durch Addition einer festen 
Anzahl von Leerstellen rechts vergréBert werden. 


Bei Ausgabe auf Band ist die zulassige Mindestsatzlange 15 Zeichen 
fur numerische Blécke und 20 Zeichen fur nicht-numerische Blécke . 
Stitze von kleinerer Lange miissen entweder durch dieses Verfahren 
oder in der Zusatzsektion fiir die Ausgabe vergréBert werden. Platten- 
adressen, die auf Band ausgegeben werden, mUssen immer vergréfert 
werden und Plattenadressen plus Schitissel mUssen nochmals verléingert 
werden, 


a 
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1.5.3. | Zusatzsektionen O und M fir die Ausgabe 


Bis zu 4 Own-Coding-Routinen kénnen in dem letzten Sortierdurchlauf 
(Sektion O) oder beim Mischen (Sektion M) eingefUgt werden. Die még- 
fichen Funktionen sind identisch und werden in festen Phasen bei der 
Erstellung der Ausgabedatei ausgefthrt. 


a) Vor Beginn der Ausgabe kann der Benutzer die anderen Routinen in dieser 
Sektion initialisieren, eine Uberschriftszeile drucken, usw. 


b) Die Sdtze kénnen paarweise in zwei Begriffszonen A und B enthalten 
sein, A enthalt den Satz, der als nachster in die Ausgabedatei Uber- 
tragen wird und B den ndchsten Satz plus 1. Dadurch wird jeder Satz 


zweimal angegeben: oO 


1. in B mit dem vorhergehenden Satz in der Ausgabedatei A 
2. in A mit dem folgenden Satz B 


Das Hauptprogramm erhalt einen Hinweis, wenn die Sdtze gleiche 
Schlussel haben, Die Satze, die im internen Satzformat angegeben 
sind, das vor der Anwendung einer Prozedur zur Aufbereitung ange- 
geben wurde, kénnen vom Benutzer wie folgt bearbeitet werden: 


Ejner der Stitze kann geléscht werden. 


Der Satz in Zone A kann in Ubereinstimmung mit dem letzten Ausgabe- 
format getndert werden. 


Eine beliebige Anzahl never Sétze kann zwischen die Sdtze in A und 
B eingefugt werden. 


°o 


Der Satz in A kann getindert und der Satz in B geléscht werden. 


Mit der Option Liéschen kénnen alle Sdtze mit gleichen SchlUssein 
geldscht werden. 


c) Auf den letzten Satz konnen Summensiize folgen, die mit dem Datei- 
format Ubereinstimmen bzw. das Dateiformat kann erstellt werden. 


d) Bei Ende des Programms kann die Steuerung auf diese Sektion statt 
auf das Operating System Ubergeben werden. 


oO 
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Weitere Maglichkeiten 
Checkpoint und erneves Starten 


Falls zulassig, sollte die Checkpoint-Routine immer angegeben werden, 
wenn umfangreiche Objektprogramme vorliegen oder wenn ursprungliche 
Daten Uberschrieben werden. 


tn allen Objektprogrammen, die unter der Steverung des EDOS laufen, 
kénnen Checkpoints angegeben werden. Checkpoints kinnen in allen 
Programmen, die unter der Steverung des ETOS laufen, angegeben 
werden, die keine 7-Spur-Binder fur die Ausgabe oder fur Arbeits- 
dateien benvizen. 


Im Hauptprogramm wird entschieden, wie oft Checkpoints angelegt 
werden. Bei einer Stérung braucht der Benutzer nur auf den vorher= 
gehenden Checkpoint zurUckzukehren. 


Checkpoints werden unter der Steuerung des EDOS auf Platte geschrieben 
und unter der Steuerung des ETOS auf Arbeits- und Ausgabebiinder. Die 
Datei, wohin der Checkpoint Ubertragen wird, wird bei jeder Benutzung 
aufgelistet. 


Das erneute Starten erfolgt immer durch die entsprechende Karte .RST. 
Gemeinsame Einheiten und Dateien bei Sortierprogrammen auf Band 


Wenn die Eingabe- und Ausgabeeinheiten keine Arbeitsdateien aufnehmen 
kénnen oder sollen, kann dieses Kapitel unberticksichtigt bleiben. Die 
empfohlene Verwendung der Dateien ist jedoch der Art, dafi die folgenden 
Prinzipien Beachtung finden sollten. (Es wird vorausgesetzt, dai die Ein 
heiten die angegebenen Dateien aufnehmen kénnen). 


- Allen Arbeitsdateien mu8 eine separate Bandeinheit zugeordnet werden, 
und alle Einheiten mit Arbeitsdateien mussen unterschiedlich numeriert 
sein, 


- Die Etngabedatei kann dieselbe Einheit als Arbeitsdatei benutzen. 


- Die Ausgabedatei kann dieselbe Einheit als Arbeitsdatei benutzen, mit 
Ausnahme, wenn die Eingabedatei dieselbe Einheit benutzt. 
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Diese Fallen beziehen sich auf die Identitat der Einheiten, Es ist auch 
moglich, bestimmte Einheiten mit derselben Nummer zu benutzen, wenn 
die nicht-benutzte Einheit off-line geschaltet wird. Es ist jedoch ublich, 
unterschiedliche Einheitennummern zu benutzen. 


Es ist maglich, die Binder selbst fiir mehr als einen Zweck zu benutzen. 
Dieses Verfahren wird mit Overlay bezeichnet und ist zwischen der Eingabe- 
datei und einer Arbeitsdatei sowie zwischen einer Arbeitsdatei und der 
Ausgabedatei méglich oder auch in beiden Fallen, wenn verschiedene 
Arbeitsdateien benutzt werden, 


Wenn eine Datei eine andere Uberlagert, mu dieselbe Bandeinheit fur 
beide Dateien benutzt werden, und die Einheit mu8 dieselbe Nummer fur 
beide Verwendungen haben. 


Die Uberlagerung wird nicht empfohlen, da die Eingabe- und Ausgabe- 
dateien Bestandtei] der Bandbibliothek einer Anlage sind und nicht der 
intensiven Benutzung, wie es beim Sortieren erforderlich ist, ausgesetzt 
werden sollten, Wenn die Eingabe- und Ausgabedateien jedoch nur 
Zwischendateien fir das Bibliotheks-System sind, ist die Verwendung 
der Uberlagerung niizlich, vorausgesetzt, dai neu gestartet werden 
kann, um gegebenenfalls die Eingabedatei neu zu erstellen. 


Wenn die Eingabe uber einer Mehrfachdatei erfolgt und ein entsprechendes 
Sortierprogramm gefordert ist, wird das Prinzip der Uberlagerung auf jede 

Spule der Eingabedatei angewendet, obgleich in diesem Falie die Option 
Wechselstation nicht maglich ist. 


Erfolgt die Eingabe Uber eine Mehrfachdatei und wird ein Sortierprogramm 
auf nur einer Spule gefordert, wird die Uberlagerung nur auf der letzten 
Spule der Datei angewendet, da keine Arbeitsdatei fur die Einheit erfor- 
derlich ist, bevor die Eingabedatei vollsttindig gelesen worden ist. Wenn 
die Option Wechselstation benutzt wird, kann die Uberlagerung auf eine 
der Eingabeinheiten angewendet werden. 


Eine Ausgabedatei, die eine Eingabedatei uberlagert, kann eine Einfach- 
oder eine Mehrfachdatei sein und kann die Option Wechselstation auf eine 
der Ausgabeeinheiten anwenden, sofern das Sortierprogramm selbst nicht 
auf mehreren Spulen erfolgt, da in diesem Falle die Uberlagerung nicht 
zuldssig ist. 


GE-120/130 Se 
Ref .-Nr.: 32.30.307 D 


Juni 1970 


-21- 


Beim Ablauf eines Programms, fur das ein Overlay gefordert worden ist, 
wird keine Anweisung ausgedruckt, die das Laden und die Uberlagerungs- 
datei spezifiziert. Das Programm halt auch nicht zu diesem Zwecke an. 
Daher mu8 dieselbe Einheit mit derselben Nummer fir beide Dateien be~ 
nutzt werden. Wenn diese Aussage fur eine Einheit ohne Overlay richtig 
ist, kann dieser Effekt auch erreicht werden, wenn beim Ausdruck der An- 
weisung das Band nicht gewechselt wird. Das kann nutzlich sein, wenn 
wahrend des Programmablaufes festgestellt wird, daB die Anzahl der freien 
Arbeitsbander zu klein ist. 


1.6.3, Gemeinsame Einheiten und Dateien bei Sortierprogrammen auf Platte 

In einem Sortierprogramm ist die Beziehung zwischen zwei Arbeitsdateien 

oO sehr wichtig. Es ist mdglich,daB keine Zone eines Plattenstapels zu beiden 
Dateien gehért. Die Geschwindigkeit des Sortierprogramms wird durch die 
Verwendung zweier verschiedener Teile desselben Plattenstapels durch zwei 
Dateien beeinfluBt. Da alle Plattenstapel beider Dateien gleichzeitig vor- 
‘iegen mussen, wird bei Verwendung desselben Plattenstapels dieselbe Ein- 
heitennummer fir die Teile der Dateien angegeben. Wenn die Verwendung 
einer Einheit fir Teile beider Dateien nicht vermieden werden kann, sollten 
die folgenden Angaben berUcksichtigt werden: 


- Der Leistungsverlust pro gemeinsamer Einheit hangt von der kleineren 
Zone ab, die auf dieser Einheit belegt witd. Wenn mehr als eine ge- 
meinsame Einheit vorliegt, hiangt der Leistungsverlust von der Summe 
der kleineren Zone ab (nicht von der Summe der Zonen, die von der- 
selben Datei auf den Einheiten belegt werden). 


- Der Leistungsverlust ist nicht so groB, wenn die gemeinsame Einheit das 
oO Ende der einen Datei und den Anfang der anderen Datei enthalt. 


Wenn z.B. die drei Platteneinheiten 1, 2 und 3 zwei Arbeitsdateien A und 
B mit einer Linge von je 1 1/2 Plattenstapeln enthalten, kann der Benutzer 
theoretisch folgende Zonen zuordnen: 


~ Er kann einen halben Plattenstapel aus A und einen halben Plattenstapel 
aus B jeder der drei Einheiten zuordnen. Damit werden beide Empfehlungen 
ignoriert und es ergibt sich ein leistungsschwaches Sortierprogramm. 


- Er kann den ersten Plattenstapel von A der Einheit 1 und den restlichen 
halben Plattenstapel der Einhelt 2, dann den ersten halben Plattenstapel 
von B der Efnheit 2 und den restlichen Plattenstapel der Einheit 3 zuordnen. 
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Damit werden die vorher angegebenen Verluste auf ein Minimum reduziert 
(dasselbe Verfahren kann auf eine ungerade Zahl 2n + 1 von Plattenein- 
heiten mit aufeinanderfolgenden Nummern angewendet werden: Die 
ersten n-Einheiten enthalten die ersten n-Plattenstapel der Datei A, 

die letzten n-Einheiten enthalten die letzten n-Plattenstapel der Datei B 
und die mittlere Einheit enthalt den letzten halben Plattenstapel von A 


Ei 


ngabe- und Ausgabedateien kénnen auf die gleiche Art einen Leistungs- 


verlust verursachen. Wenn die Eingabe und Ausgabe auf Datentragern 
erfolgt, die nicht als Arbeitsspeicher benutzt werden, ergeben sich keine 
Schwierigkeiten. Wenn jedoch dieselben Platteneinheiten als Arbeitsdateien 
benutzt werden, mUssen die folgenden Punkte beachtet werden: 


Weder die Eingabe- noch die Ausgabedatei darf eine Zone benutzen, 
die gemeinsam von einer Arbeitsdatei benutzt wird und eine weitere 
Zone, die gemeinsam von der zweiten Arbeitsdatei benutzt wird. 


Wenn die Eingabe- oder Ausgabedatei einen Teil des Plattenstapels 
benutzt, der auch Teile beider Arbeitsdateien enthdlt, tritt ein 
Leistungsverlust ein. 


Bleibt die Eingabe- oder Ausgabedatei auf Einheiten beschrénkt, die 
nur Daten aus einer einzigen Arbeitsdatei enthalten, tritt kein 
Leistungsverlust auf. 


- Die zu tberlagernde Datei darf wahrend des Sortierens nicht mehr benutzt 
werden, 


- Die zu Uberlagernde Datei wird vom Sortierprogramm erst dann benutzt, 
wenn die darin enthaltene Datei nicht mehr bendtigt wird. 


- Wenn eine Arbeitsdatei einer Eingabedatei uberlagert wird, mUssen alle 
Stapel bzw. Spulen einer Arbeitsdatei eréffnet werden kénnen, bevor das 
Ende der Eingabedetei erreicht ist. 


- Es kinnen folgende Daten tberlagert werden: Eingabedatei mit einer 
Arbeitsdatei, Ausgabedatei mit einer Arbeitsdatei; es konnen beide oben 


angegebenen Dateien gleichzeitig benutzt werden, wenn verschiedene 


1°) 


© 
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Von der Tatsache, dai zwei Dateien bei einem Sortierprogramm auf Platte 


di 


jeselbe Einheit oder dieselben Einheiten benutzen, darf nicht hergeleitet 


werden, daB die Dateien auf demselben Plattenstapel oder Plattenstapeln 
stehen (ausgenommen bei zwei Arbeitsdateien). Der Generator nimmt an, 
daB verschiedene Plattenstape! benutzi werden, wenn keine anders 


la 


utende Angabe gemacht wurde. Normalerweise halt am Ende des 


Vorsortierens und bei Beginn des letzten Durchlaufes das Objektprogramm 
an und druckt eine Meldung aus, die darauf hinweist, daf eine andere 
Datei geladen werden soll; im ersten Falle eine Arbettsdatei und im 
zweiten Falle die endgiltige Ausgabedatei. 
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Wenn ein Benutzer eine Plattenstation fur zwei verschiedene Zwecke 
benutzen will, kann er eine Uberlagerung angeben. 


In diesem Fall Fuhrt das Objektprogramm folgende Uberlagerungen 
durch: 


entweder = Datei 2 uberschreibt Datei 1 im gleichen Plattenstapel, 


oder = Datei 2 und Datei 1 befinden sich in verschiedenen Zonen 
auf der Platte, 

oder - Datei 2 befindet sich auf einem anderen Plattenstapel 
als Datei 1. 


Common Storage 


In den hohen Kernspeicherpositionen kann eine Zone fUr die Kommunikation 
zwischen den Zusatzsektionen reserviert werden. Diese Zone wird vom 
Hauptprogramm weder benutzt noch adressiert. Zur Adressierung dieser 
Zone mUssen absolute Adressen benutzt werden. 


Mit der Option kénnen Zwischensummen gespeichert werden, die von der 
Zusatzsektion | erste lit worden sind, und die spater durch die Zusatz~ 
sektion O getestet werden, 


Zwischen zwei Zusatzsektionen ist keine andere Art von Kommunikation 
mdglich. 
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Aufbau des Objektprogramms 
Die Anzahl der Objektprogramme, die generiert werden kénnen, ist 
scheinbar unbegrenzt, und es ist nicht méglich, alle Methoden zu ver= 
gleichen, die zu demselben Ziel fuhren kénnen. Fur Mischprogramme 
muB die folgende Relation erfullt. sein: 

FB+A M-X 


Darin bedeuten: 


-F: Summe der Langen aller Dateitabellen fir alle benutzten Dateien. 


- B: Gesamtzone, die von den Puffern belegt wird (2 fur jede Datei gleich oO 


der Ubertragslange plus 1 Satzpuffer, wenn die Zusatzsektion M die 
Sdtze bearbeifet). 


-A: Summe der Léngen aller Own-Coding-Routinen. 
- M: Kernspeicherplatz, der dem Objektprogramm zugeordnet worden ist. 


-X: 3,200 bei Verwendung des ETOS, und 3.650 bei Verwendung des 
EDOS, 


Die Leistung des Mischprogramms wird auferdem von der verwendeten 
Puffergré@e beeinfluBt, die auf die héchsten zuldssigen Werte vergréfert 
werden sollten. 


Arbeitseinheiten bei Sortierprogrammen auf Band 


Je mehr Arbeitseinheiten erklart worden sind, umso leistungsfahiger ist das 
Sortierprogramm, Bei einer groBen Anzahl von Arbeitseinheiten oder be- 
grenzter VerfUgbarkeit des Kernspetchers kann z.B. eine groBe Leistung 
durch eine gréRere BlockgréGe erreicht werden, wenn nicht alle Arbeits- 
einheiten verflgbar sind. Aus der Zeittafel gehen die verschiedenen 
Zeiten fur dasselbe Sortierprogramm bei unterschiedlicher Anzahl von 
Arbeitseinheiten hervor. 


Wenn auf allen Einheiten die Option "Lesen riickwérts" verftigbar ist, ist die 
Leistung des Sortierprogramms wesentlich haher, als wenn diese Option auf 
einer oder mehreren Einheiten nicht zur Verfugung steht. In einigen Fallen 
ist es besser, nicht alle verfiigbaren Einheiten zu benutzen, sondern nur 

die mit der Option "Lesen riickwarts", 
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Die Leistung des Sortierprogramms hiingt auch von der Geschwindigkeit 
jeder Bandeinheit ab. Es kann gesagt werden, daB die gesamte Anzahl 
der Ubertrage auf Band angenthert gleichmaBig unter die Arbeitsdateien 
verteilt wird, wobei immer dieselbe BlockgréBe benutzt wird. So da in 
einem Sortierprogramm mit W-Arbeitsdateien auf jeder Einheit 1/W 
Ubertriige statifinden. Beim Lesen Vorwiirts wird die Ruckspulzeit auf 
dieselbe Art verteilt. Daher kann es in bestimmten Fallen besser sein, 
eine langsamere Bandstation auszulassen, und eine gréBere BlockgréBe 
sowie schnellere Ubertrags- und RUckspulzeiten zu benutzen. Die fang- 
samere Bandstation kann fur die Eingabe oder Ausgabe ohne wesentliche 
Leistungsminderung benutzt werden. 


Die Schreibdichte jedes Bandes beeinflu@Bt die Sortierzeit dhnlich wie die 
oO Bandgeschwindigkeit. Daher solite die max, Schreibdichie fir alle Arbeits- 

dateien benutzt werden, Bei unterschiedlicher Schreibdichte mu8 die 

Situation wie im vorhergehenden Paragraphen kontrolliert werden. 


Bei der Verwendung des Systembandes als Arbeitsband (nur bei einer 
l-sputigen Datei miglich) mu jedesmal, wenn ein Segment des Objekt- 
programms Ubertragen wird, und wenn das Systemband gelesen oder ge- 
schrieben wird, das Systemband vorher zuriickgespult und nachher neu 
eingestellt werden. (Geschieht automatisch durch das Programm), Es kann 
angenommen werden, da die durchschnittliche Datenmenge auf dem 
Systemband an diesen Punkten = D/(W-1) ist; D ist der Umfang der Datei 

und W ist die Anzahl der Arbeitsdateien. Ein neues Segment wird eingegeben: 


= am Ende der Eingabephase - 
- be? Beginn der Ausgabephase 
- wenn in einer der anderen Arbeftsdateien ein Overflow auftritt 


Die Routine mit Overflow bei Arbeitsdateien benutzt eine allgemeine 
Arbeitszone, die immer fUr andere Zwecke verfiigbar ist. Durch die 
Reduzierung der Arbeitszone erfolgt daher kein Zeitverlust, wahrend 
die Operation der Overflow-Routine genligend Zeit zur Verfiigung hat 
(zusitzlich zu einer méglichen Manipulation des Systembandes). 


Bei Sortierprogrammen mit Lesen vorwirts wird Zeit fUr den Spulenwechsel 
beim Schreiben und beim Lesen bendtigt. Bei Sortierprogrammen mit 
Lesen rckwarts sind folgende zustitzliche Operationen erforderlich: 


- Beim Schreiben, d.h. bei Feststellung des Problems, mu die erste 
Spule volistindig zuruckgespult werden. 
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~ Beim Lesen mu® der zweite Datentrager schon eingestellt sein. Wenn 
dieser gelesen worden ist, mu der erste Datentrdger geladen werden 
und dann durch das Overtlow-Segment, das vom Ende der Spule ge- 
lesen wird, eingestellt werden, da die Arbeitsdateien bef einem Sortier- 
programm mit Lesen rUckwirts immer vorwiarts geschrieben und rickwdrts 
gelesen werden. 


Wenn die Eingabe und Ausgabe auf Band erfolgt und die Einheiten als 
Arbeitsstationen benutzi werden kénnen, sollten sie fur diesen Zweck 
ausdricklich erklart werden, andernfalls wird die Leistung des Sortier- 
programms aus den frisher angegebenen Griinden reduziert. 


Die Verwendung der Option "Wechselstation" bei der Ausgabe oder Eingabe 
(diese Option ist bei Arbeitsdateien nicht zugelassen) schlie@t automatisch oO 
eine der so erklarten Einheiten aus; die Option wird nicht empfohlen, wenn die 
Einheiten keine Arbeitsdateien aufnehmen kénnen. Der Grund dafUr ist, 

daB nur eine der erklérten Einheiten als Arbeitsdatei benutzt werden 

kann. Wenn sowohl Eingabe- als auch Ausgabedateien die Option 

"Wechselstation" benutzen und wenn jede der Dateien eine Einheit auch 

als Arbeitsdatei benutzt, kann dieselbe Wechselstation fir beide benutzt 

werden (diejenige, die nicht als Arbeitsdatei fur die Eingabe oder Ausgabe 

benutzt wird). 


1.7.2.  Arbeitstationen in Sortierprogrammen auf Platte 


Die empfohlene Zuordnung der Arbeitszonen auf Platte ist im vorher- 
gehenden Abschnitt beschrieben worden. Es wird darauf hingewiesen, 
daB die Verwendung einer anderen Zuordnung zu einem erhshten Zeit- 
bedarf fur das Sortierprogramm fUhren kann. 


1.7.3.  Zusatzsektion H und Checkpoint ) 


Der Einschlu®8 der Zusatzsektion H oder der Checkpoint-Routine in Sortier- 
programmen beeinflut nicht die GréBe des Kernspeichertei!s, da der 
sequentielle Aufbau des Objektprogramms die Benutzung derselben Zonen 
als Routinen aus anderen Phasen erlaubt. 


Die erforderliche Zeit zum Schreiben eines Checkpoint kann vernachldssigt 
werden, wohrend sich aus der Verwendung eines Checkpoint ein grofer 
Zeitgewinn im Fehlerfall ergibt. Daher wird die Verwendung von Check- 
points mit Ausnahme bei ganz kurzen Programmen empfohlen. 
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1.7.4.  Vergleichssektion C 


Die Vergleichsroutine steht immer im Kernspeicher. Deshalb wird 
empfohlen, daB eine lange Routine wie z,B. das Abfragen einer Tabelle 
nicht benutzt wird. In diesen Fallen ist es besser; die Daten in der 
Eingabesektion | umzuwandeln und sie in der Ausgabesektion O erneut 
umzuwandeln, so daB eine generierte Vergleichsroutine benutzt werden 
kann, Die Sektionen [ und O beeinflussen die kritischen Sortierphasen 
nicht direkt. 


Eine generierte Vergleichsroutine belegt 10 Bytes fUr jeden benutzten 
Schlussel, Die Zeit flr die Sortier- und Ausgabephasen wird fast voll- 
sttindig von Ubertréigen auf Randeinheiten absorbiert, Wahrend der 

oO Eingabephase wird eine Zeit von einer Millisekunde pro Satz in der 
Datei oder einer Minute pro 60.000 Sttze bendtigt. 


1.7.5.  Ausgabeoptionen 


Der Kernspeicherbereich, der in der Ausgabephase vom Benutzer fur 
Optionen benutzt wird (Standardprozeduren ftir die Aufbereitung oder 
die Routinen fiir die Zusatzsektion ©) beeinflu8t die Leistung des 
Sortierprogramms nicht, bis ein kritischer Wert erretcht wird. Dieser 
kritische Wert hiingt von einer variablen Anzahl von Kriterien, die 
vom Generator ausgewuhlt werden, ab: 


- Grofe des Ausgabepuffers 

- Grote des Puffers der Arbeitseinheit 
- Anzahl der Arbeitseinheiten 

- Art des Sortierprogramms 


oO Die Benutzerroutinen der Zusatzsektion O sollten nicht mehr Kernspeicher- 
platz belegen als aus der folgenden Beziehung hervorgeht. Andernfallls 
reduziert der Generator die PuffergréBe der Arbeitseinheit und damit die 
Leistung des Sortierprogramms 


Zusatzsektion O < (500 + 2W - 2B) 


W und B sind jeweils die Linge der Arbeits- und Ausgabepuffer. 
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Umfangreiche Dateien 


1.7.6. 
a) 
b) 
c) 
GE-120/130 


Sortierprogramm einer Datei auf einer Spule 


Die Datenmenge, die ohne Overflow in diesem Falle sortiert werden 
kann, héngt von der Kapazitat der kleinsten Spule ab, die als Arbeits— 
datei benutzt wird. Kleinste Spule bedeutet in diesem Falle, Linge 
des Bandes, Schreibdichte und die Lange des Arbeitspuffers, die aus 
der Zeittabelle ersichtlich ist. 


Wenn eine gréRere Datenmenge sortiert werden soll und das Sortieren 
auf mehreren Spulen nicht zulassig ist, muB die Datei in kleinen Ab- 
schnitten sortiert werden, wobei die Eingabe jeweils durch die Zusatz— 
sektion | fr die Eingabe beendet wird. Danach milssen ein oder 
mehrere Mischprogramme auf die Ausgabe angewendet werden, wie 
beim Sortieren einer Mehrspulendatei. 


Sortierprogramm einer Mehrfachdatei auf Band 


In dieser Version kénnen bis. zu 10 aufeinanderfolgende Spulen sortiert 
werden. Liegen mehr als 10 Spulen vor, so nimmt der Benutzer an, 
da er R-Spulen zu sortieren hat und ihm W + 1 Arbeitseinheiten zur 
Verfiigung stehen, wabei R 10W ist. 


Das Sortierprogramm einer Mehrfachdatei auf Band sollte auf jede 
Spule der aufeinanderfolgenden R/W-Spulen angewendet werden, 
wobei der Wert aufgerundet wird. Dadurch werden genau W-Zwischen- 
dateien gebildet, die in das Datefmischprogramm eingegeben werden, 
wobei eine Datei auf jeder der W-Einheiten aufliegt und fir die 
Ausgabe vorgesehen ist. 


Sortierprogramm auf Platte 


Es werden zwei Arbeitsdateien benstigt. Jede der Arbeitsdateien muG 
die Datenmenge, die sortiert werden soll, um 3 Zylinder ubersteigen. 
Wenn diese Anordnung nicht méglich ist und mindestens 4 Platten- 
einheiten zur Verfiigung stehen, ist es méglich, jeweils einen oder 
mehrere Plattenstapel zu sortieren und dann eine Reihe von Misch- 
programmen auf die sortierten Plattenstapel auszufuhren. Die System- 
platte kann wahrend der Mischphase nicht benutzt werden. - 
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2. Ursprungsprogramm 
2.1. Aufbau des Ursprungsprogramms 


In diesem Abschnitt wird die Verwendung von Lochkarten, Bandern und 
Platten zur Aufnahme des Ursprungsprogramms beschrieben, sowie die 
Folge, mit der die SPG-Befehle und APS-Zusatzsektionen dargestellt 
werden mijssen. In den Abschnitten 2 und 3 werden die Befehle im 
einzelnen beschrieben. 


Der Generator fuhrt einen grindlichen Test des Ursprungsprogramms aus 
und druckt Fehlermeldungen und Anweisungen aus. Die Fehlermeldungen 
und Anweisungen sind im Anhang aufgefuhrt. 


2.1.1. Datentrager und Formate 


Wenn die Generierung im ETOS erfolgt, kénnen die nachstehenden Daten- 
trager das Ursprungsprogramm enthalten: 


- Lochkarten 
- Magnetbinder 
- Magnetband fur die SPG-Befehle und Lochkarten fur die Zusatzsektionen. 


Wenn die Generierung im EDOS erfolgt, kénnen die nachstehenden Daten- 
trager das Ursprungsprogramm enthalten: 


~ Lochkarten 
- Platten 
- Platte fur die SPG-Befehle und Lochkarten fir die Zusatzsektionen. 


Oo Der erste Befehl .SPG muf immer in einer Lochkarte stehen und die Makro~ 
befehle SECT und ESCT, die jede Zusatzsektion beginnen und beenden, 
missen auf demselben Datentrager wie die Sektion selbst stehen, 


a) Ursprungsprogramm in Lochkarten 


In diesem Falle folgen auf die Karte .SPG alle anderen Parameterkarten 
und wahlweise die Zusatzsektionen. Die vorletzte Karte des Karten- 
stapels hat in den Spalten 18 - 20 den Operationscode END, die 

letzte Karte in den Spalten 1 - 4 END. 
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Die SPG-Befehle werden im folgenden beschrieben und die Zusatz- 
sektionen haben die Form normaler APS-Kodiersektionen, die in 
Karien gestanzt sind, wobei jede mit einem Befeh! SECT beginnt 
und einem Befehl ESCT endet, mit Ausnahme der letzten, wo kein 
ESCT benutzt wird. 


Der Aufbau der SPG-Befehle ist,abgesehen von der Karte .SPG selbst, 
den APS-Befehlen dhnlich. Das gesamte Ursprungsprogramm kenn auf 
APS-Kodierformularen geschrieben werden. 


AuBer den Steverdaten (Page-Nummer, Zeilen-Nummer, Identifikations- 

code) bendtigen die SPG—Befehle den Operationscode (Spalten 18 - 22), 

das Operandenfeld (Spalten 25 - 71) und die Fortsetzungsspalte (Spalte E> 
Bei den SPG~Befehlen wird das Feld "Name" nicht benutzt. 


Es ist méglich, die Option "Fortsetzung" in dem Makrobefehl FLD 
anzugeben. Wenn das Operandenfeld nach Spalte 71 fortgesetzt 
wird, muB ein C in Spalte 72 gelocht werden, und das Operanden- 
feld wird von Spalte 25 der nachsten Zeile an fortgesetzt. Auf der 
Fortsetzungszeile wird kein Operationscode angegeben. 


Fur die Mehrzahl der SPG-Makrobefehle ist mehr als ein Operand 

erforderlich. Wie bei den APS-Befehlen missen die Operanden durch 

ein Komma getsennt werden. Zur Trennung der Operanden darf keine 

Leerstelle benutzt werden. Eine Leerstelle nach einem Operanden 

wird als Ende aller Operanden dieses Befehls aufgefaBt. Jedes folgende 

Zeichen wird als ein Kommentar angesehen und wird vom Generator 

nicht bericksichtigt. Ein Parameter kann nicht auf zwei Zeilen ange- 

geben werden,und der letzte Parameter einer Zeile mit einem Fort~ 
setzungszeichen in Spalte 72 darf nicht mit einem Komma angegeben oO 
werden. 


b)  Ursprungsprogramm auf Band 


Das Ursprungsprogramm kann auf Band stehen und folgt auf 
die zwei Header—-Kennsitze und auf die Bandmarke. 


Es kann in 7 oder 9 Spuren geschrieben werden; die Schreibdichte 
betrigt 200, 556 oder 800 Bits pro Zoll bzw. es wird in Phasen- 
modulation geschrieben (1600 bpi). 
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Jeder SPG-Makrobefehl oder APS-Befehl hat einen Block aus 85 
Zeichen, Dieser Block besteht aus: 


- Zeichen 1 - 5: Dezimale Blocknummer von 00001 an. 
- Zeichen 6 = 85: 80 Spalten fUr das Kartenbild des Befehls. 


Das letzte Bild mu® das des Befehls END sein (Spalten 18 - 20). 


In diesem Fal! mu@ der Kartenleser immer mit den Karten .5PG und 
KEND (in den Spalten 1 - 4) geladen'werden. Die Karte BEND darf 
nicht mit dem Operationscode END verwechselt werden, der in diesem 
Falle auf Band steht, 


Ursprungsprogramm auf Platte 


Das Ursprungsprogramm kann auf der Systemplatte (Einheit Null) 
stehen und beginnt mit der ersten freien Zone. Diese Zone mu8 
mindestens 10 Zylinder grof sein, da sie fur die Umwandlung des 
Objektprogramms benuizt wird. 


Die Befehle kénnen im 6- oder 8-Bit-Modus geschrieben werden. 
Jeder Sektor (384 Zeichen im 6-Bit-Modus und 288 Zeichen im 
8-Bit-Modus) enthalt drei Kartenbilder in den ersten 240 Zeichen; 
die restlichen 144 bzw. 48 Zeichen werden nicht benutzt und sind 
ohne Bedeutung. 


Es sollten aufeinanderfolgende Sektoren benutzt werden und alle mit 
Ausnahme des letzten Sektors mUssen in allen dret Positionen Bilder 
enthalten. Das letzie Bild mu@ das des Befehls END (in den Spalten 
18 = 20) sein und kann in einer der drei Positionen stehen (Spalten 
1 = 80, 81 - 160 oder 161 - 240), Wenn eine der ersten zwei 
Positionen belegt wird, sind alle folgenden Daten ohne Bedeutung. 


In den Kartenleser mUssen immer die Karten .SPG und KEND (in den 
Spalten 1 = 4) eingelegt werden. Die Karte BEND darf nicht mit dem 
Operationscode END verwechselt werden, der in diesem Falle auf 
Platte steht. 


Ursprungsprogramm auf gemischten Datentrégern 


Das Ursprungsprogramm kann teils auf Band oder Platte und teils in 
Karten stehen. In diesem Falle hat der Kartenleser folgenden tnhalt: 
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- Karte .SPG 

~ Fur jede Zusatzsektion mUssen angegeben werden: eine Karte SECT, 
die APS-Kodierung fUr die Sektion und die Karte ESCT (mit Ausnahme 
fur die letzten Sektionen). 

- Karte END (Spalten 18 - 20) 

- Karte END (Spalten 1 - 4) 


Alle anderen Befehle stehen auf Band oder Platte, in der fUr diese 
Datentrager beschriebenen Form. Das Kartenbild ist das des Befehls 
EAPS und nicht das des Befehls END. 
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2.1.2. Inhalt des Ursprungsprogramms 


In Abschnitt 2.2. werden folgende SPG-Befehle beschrieben: 


-SPG zum Anruf des Generators 


STRT - Start Program 


Dieser Befehl mui immer angegeben werden. Er beschreibt die Anfangs- 
adresse des Objektprogramms und die belegte Kernspei cherkapazitat. 


OBJP - Object Program 


Mit diesem Befehl wird eine bestimmte Zone des Kernspeichers reserviert 
und angegeben, ob Checkpoints eingerichtet werden. 


DVC - Device 


Dieser Befehl beschreibt die Einheit, wo eine Datei gespeichert ist,sowie 
den Schreibmodus. 


FLOP - File Options 


Dieser Befeh! definiert den Gesamtaufbau der Datei und wird durch den 
Dateicode mit der entsprechenden Karte DVC verketiet. 


FLD - File Description 


Dieser Befehl beschretbt den Block~ und Satzaufbau einer Datei, die durch 
den Dateicode mit den entsprechenden Befehlen DVC und FLOP verkettet 
ist. 


CFL - Card File 


Dieser Befeh! gibt den Satzaufbau einer Kartendatei an, wenn sie nicht 
zusdtzlich zu einer Platten- oder Banddatei gehért (Eingabe fur ein Misch- 
oder Sortierprogramm) oder, wenn sie eine Zusatzdatei ist, aber ein 
anderes Format hat (gemischie Eingabe fur ein Sortierprogramm). 


OLAY - Overlay 


Dieser Befehl gibt an, wie die Dateien Uberlagert werden. 
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KEY - Key 


Dieser Befehl definiert die Felder, die als Kriterien dienen, woraus die 
letzte Saizsequenz erstellt wird. Fur jeweils bis zu 16 Schlussel ist ein 
Befehl erforderlich, Es ist nicht notwendig, alle Schlisse! in einem spe- 
ziellen Sortier- oder Mischprogramm zu benutzen (siehe unten). 


SORT oder MERG - Sort or Merge 

Dieser Befehl informiert den Generator, ob das zu erstellende Objekt- 
programm ein Sortier= oder Mischprogramm ist, das die Schliissel benutzt, 
die in den Befehlen KEY definiert worden sind. 

USE - Use 

Mit je einem Befeht USE wird jede Zusatzsektion zusammen mit ihren 
Verkettungspunkten spezifiziert. Zu dieser Regel gibt es zwei Ausnahmen: 
Die Sektion zur Eréffnung einer Eingabebanddatei mit einem nicht-standard= 
maBigen Kennsatz wird in dem Befehl FLD beschrieben und die zustitzliche 
Vergleichssektion, die nur einen Eingangspunkt mit einem bestimmten 


Namen hat, 


Die Sektionen selbst folgen nicht auf den Befeh| USE, sie stehen innerhalb 
der Befehle SECT und ESCT nach dem Befehl EAPS. 


EAPS = Enter APS 


Dieser Befehl gibt an, ob die APS~Befehle, die die Zusatzroutinen in 
dem Befehl USE bilden, folgen. 


SECT - Section 


Dieser Befehl gibt den Beginn der in APS kodierten Zusatzsektion und 
den Namen der Sektion an. 


ESCT - End Section 


Dieser Befeh! signalisiert das Ende einer Zusatzsektion, wenn sie nicht 
die einzige oder die letzte Sektion ist. 


END = End 


Dieser Makrobefehl gibt das Ende des Ursprungsprogramms an. 
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BEND 
Das Ende der Daten im Kartenleser wird signalisiert. 
Die Befehle werden in nachstehender Reihenfolge angeordnet: 


»SPG 
STRT 
OBJP 
DVC, FLOP (wahlfrei), FLD fur jede Eingabedatei- 
DVC, FLOP (wahlfrei), fur jede Arbeitsdatei (nur fur Sortierprogramme). 
DVC, FLOP (wahlfrei), FLD fur die Ausgabedatei» 
CFL, (wahlfrei fur Kartendateien). 
i) OLAY, (wahlfrei fur Sortierprogramme). 
KEY, einmal fur jeden Schlussel (wird nicht bendtigt, wenn die Zusatz- 
sektion C benutzt wird), 
SORT oder MERG 
USE, einma! flr jede Zusatzsektion,ausgenommen C und H« 
EAPS, wenn Zusatzsektionen vorliegen. 


Wenn das Ursprungspragramm auf gemischten Datentrigern steht, sind die 
Ubrigen Befehle in Karten gelocht. 


SECT, Zusatzsektion, ESCT fur alle in APS kodierten Sektionen mit Aus~ 
nahme der letzten oder der einzigen Sektion, worauf kein Befehl ESCT 
folgen sollte. 


END 


.) #END 


Der Sprung von dem Hauptpragramm in die Zusatzsektionen wird auf feste 
symbolische Adressen ausgefihrt, die der Benutzer im Makrobefehl USE 
spezifizieren muG und die in der APS-Kodierung als Befehlskennsttze im 
Ursprungsprogramm angegeben werden (stehe 2.3. Namen der symbolischen 
Sprungadressen). 


2.2. SPG -Befehle 


In diesem Kapitel werden die SPG-Makrobefehle beschrieben. £s wird auf 
die folgenden Punkte verwiesen: 


~ Makrobefehle, deren Operanden ohne Bedeutung fir die Erfordernisse 
des Benutzers sind, kénnen ausgelassen werden. 


Oo 
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- In numerischen Operanden, bei denen nicht die maximale Anzahl der 
Stellen angegeben werden muB, kénnen die Vornutlen weggelassen 
werden. 


- Die Sdtze beginnen mit dem Zeichen 1 mit Ausnahme auf Platten, wo 
das Zeichen nach dem Satzcode eine 1 ist. 


2.2.1. Karte .SPG 


Dieser Befehl, der immer in einer Karte steht, Ubertragt das Segment des 
Generators in den Kernspeicher. Dieser Befehl gibt auch an, auf welchem 
Datentriger der Rest des Ursprungsprogramms steht. Es gibt zwei Formate: 
eins fiir die Verwendung im ETOS, das andere im EDOS, 


a) 
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ETOS-Version 
Spalten 1- 4 
Spalten 5- 6 


Spalten 7-14 
Spalien 15 - 49 


Spalte 50 


Spalte 51 


Spalte 52 


Spalte 53 


«SPG 

& 

Programmname , 

Programmbeschreibung, 

- Wenn die Parameter in Karten stehen, 

- 1: Wenn die Parameter auf der Bandeinheit 1 stehen 

- Bs Wenn keine Zusatzsektionen vorhanden sind oder 
wenn sie in Karten stehen. 

- 1: Wenn die Zusatzsektionen auf Band stehen, 

Beschreibung der Schreibdichte: 

- #: Wenn das Ursprungsprogramm in Lochkarten steht, 

- 1s 200 Bits pro Zoll, 

- 2: 556 Bits pro Zoll, 

- 3: 800 Bits pro Zoll, 

- 4: 1,600 Bits pro Zoll. 

~ b: Das Ursprungsprogramm steht in Lochkarten oder 
auf Band mit Unpaarigkeit. 

- 1: Das Ursprungsprogramm steht auf Band mit 
Paarigkeit. 


ne 
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b) EDOS-Version 
Te 
«SPG, Programmname, OD=od [. MS . asl, RM=> IL CM=Programmrmse 


Der Programmname mu& mit maximal 8 Zeichen angegeben werden. 


Auf der Platte OD wird nach der Kompilierung die generierte Ausgabe 
gespeichert. Es gibt die folgenden Werte: 


~ SD: Erste freie Zone der Systemplatte 
- WD: Arbeitsplatte 
oO - Einheitennummer: Von 1 - 9 oder A - F. 


Es mu8 MS benutzt werden, wenn die SPG-Makrobefehle am Anfang der 
ersten freien Zone auf der Systemplatte stehen. Fehlt dieser Operand, 
so wird angenommen, daf die Befehle in Lochkarten stehen. 


Es wird AS angegeben, wenn die Zusatzsektionen auf der Systemplatte 
hinter den Makrobefehlen stehen. Wenn dieser Operand fehlt, wird 
angenommen, dai die Zusatzsektionen fehlen oder in Lochkarten gehen. 


Das Ursprungsprogramm wird im Schreibmodus RM auf die Platte geschrie- 
ben. Es kénnen die Werte 6 oder 8 angegeben werden. Fehlt dieser 
Wert, so wird RM = 8 angenommen,. Die Angabe des Programmiitels 

ist wahlfrei und kann bis zu 35 Spalten lang sein. 


1) 
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2.2.2, \ Makrobefehl STRT (Start Proacam| 
pe 


Dieser Makrobefehl enthélt Informationen uber die allgemeine Verwendung 
des Kernspeichers durch das Objektprogramm. 


Der Makrobefehl STRT mu8 immer als der erste Befehl des Ursprungsprogramms 
angegeben werden (nach der Steverkarte .SPG). 


Aufbau: STRT nnnnn, m 


Die Angabe der zwei Operanden nnnnn und m ist wahlfrei; sie haben die 
folgende Bedeutung: 


nnann = Niedrigste Adresse, die vom Objektprogramm belegt wird. Die Oo 
Adresse wird durch 4 oder 5 Dezimalzeichen angegeben. Fehit 
dieser Operand, wird die Anfangsadresse gemuifS dem Operating 
System zugeordnet, 


™m = Kernspeicherkapazitat der benutzten Konfiguration geteilt durch 
4096. 


- 4: Kernspeicher mit 16.384 Bytes 
- 6: Kernspeicher mit 24.576 Bytes 
- 8: Kernspeicher mit 32.768 Bytes 


Fehlt dieser Operand, wird der Wert m = 4 angenommen. 
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| ort rye cmmnnermemcmis 
2.2.3. \Makrobefeh! OBJP (Object Program)} 


Dieser Befehl spezifiziert das Vorhandensein oder Fehlen bestimmter 
Optionen im Objektprogramm, 


Aufbau: OBJP Op. 1, Op. 2, Se-3 


Die Angabe beider Operanden ist wahlfrei; sie haben die folgende 
Bedeutung: 


- Op. 1 RR=Y, wenn die Checkpoint-Routine benutzt wird. 
=N, wenn die Checkpoint-Routine nicht benutzt wird. 


Dieser Operand (RR = re-run) nimmt implizite den Wert Y an, wenn er 
nicht spezifiziert wird. 


- Op. 2 CS =nnnnn 


Der Operand CS (Common Storage) spezifiziert, daBdie letzten nnnnn— 
Bytes des Kernspeichers vom Objektprogramm nicht belegt werden dirfen. 
Der Wert kann mit 1 bis 5 Dezimalstellen angegeben werden. Wenn 
dieser Operand fehlt, wird der Wert Null benutzt. 


1 \ 
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2.2.4. Makrobefeh! DVC (Device) 


Dieser Befehl definiert die Art der Einheit, die benutzt wird, um eine 
Datei aufzunehmen und mufi vor jedem anderen Befeh! fur die Datei 
stehen (FLOP, FLD, OLAY). 


Aufbau: DVC Name, p, Op. 1, Op. 2, Op. 3, Op. 4, Op. 5, Op. 6, Op. 7 
Drei Operanden miissen in diesem Befehl angegeben werden: 


Name, p, Op. } 


Name bis zu 6 Zeichen OQ 


Code-Name der Datei, worauf sich der Befeh! bezieht. Dieser Code~Name 
wird als mnemonische Adresse benutzt, die der Dateitabelle zugeordnet wird 
und steht in der Karte KLBC, die wahrend der Laufzeit des Objektprogramms 
zur Verfiigung steht. Die anderen Befehle fir die Datei (FLOP, FLD, OLAY) 
werden durch Verwendung dieses Code mit diesem Befehl verkettet. 


Dieser Operand mu immer angegeben werden. Er besteht aus bis"zu 6 alpha- 
numerischen Zeichen. Das erste Zeichen mu8 immer alphabetisch und vom 
zweiten Zeichen verschieden sein. 


Den Einheiten fur die Eingabe, Ausgabe und Arbeitsdateien mUssen verschiedene 
Namen zugeordnet werden. Sie kénnen mit den Dateinamen, die in den 
Karten JLBC stehen, identisch sein. 


p+ (I alphabetisches Zeichen) 


Dieser, Operand mu8 immer angegeben werden. Er definiert die Verwendung 
der Datei im Sortierprogramm. 


- I : Eingabedatei 
-O : Ausgabedatei 
- W : Arbeitsdatei 


- OP. 1 DV=dv 


Dieser Operand spezifiziert die Art der Einheit, wobei dv zwei alpha~ 
betische Zeichen mit den folgenden Werten sind: 


DS, MT, SN, CR, UN, 
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- DS: (Dise Storage} die Datei steht auf einer DSU 160. 


~ MT: (Magnetic Tape) die Datei steht auf einer Magnetbandstation mit 
einer 7-Spur-Stevereinheit ohne Option Lesen rickwiirts. 


-SN:  (Seven/Nine Tracks or Seven/Nine Modified Seven) die Datei 
befindet sich auf einer Magnetbandstation mit einer 7/9~Spur~ 
Steuereinheit und der Option Lesen rickwirts. Dieser Parameter 
sollte auch verwendet werden, um Bandeinheiten mit Phasen= 
modulation anzugeben. 


~CR: (Card Reader) die Datei (eine Eingabedatei) steht in Lochkarten. 


- UN: (Undefined) die Datei steht auf einem nichtdefinierten Daten- 
trager. Eine derartige Datei ist nur als Eingabedatei fir Sortier- 
=D programme zuliissig. 


Wird der Operand CR oder UN benutzt, sind keine weiteren Operanden 
zultssig. 


~ Op. 2 MT=n (fur Dateien auf Band und Platte) 


Dieser Operand spezifiziert die Nummer, die der Band- oder Platten- 

einheit mit der Date? zugeordnet worden ist. Dieser Operand muf an- 

gegeben werden, wenn der Operand ] DV = CR UN nicht spezifiziert; 
in diesen beiden Fallen darf der Operand MT nicht angegeben werden, 
Der Wert von n kann von 0 - 9 und von A - F fur Platten und von 1} - 8 
und von A = H fur Band variieren; in beiden Fallen gibt es 16 migliche 
Werte, 


- Op. 3 AT= m oder FE =n oder MR = n (Mehrfachdateien auf Band 


D oder Platten) 


Dieser Operand beschreibt das Laden einer Mehrfachdatei auf Band oder 
Platten. 


AT (Alternate Unit) spezifiziert die Nummer der Einheit, die als Wechsel- 
station mit der Haupteinheit benutzt wird. Die Haupteinheit zur Aufnahme 
einer Eingabe- oder Ausgabedatet wird in MT spezifiziert. Der Operand 
kann nicht fur Arbeitsdateien angegeben werden. Der Wert AT kann zwei 
Bedeutungen haben: 


1. Wenn m =n ist (in Operand 2 angegeben), liegt keine Wechselstation 
vor, sondern eine Mehrfachdatei . 


2. Wennm# n ist, werden die Einheiten als Wechselstationen benutzt, 
wobel mit Volume 1 auf der Einheit n, wie in Operand 2 spezifiziert, 
begonnen wird. 
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FE (File Extension) wird angegeben, wenn eine Plattendatei ther mehr 
als einen Plattenstapel verteilt ist und wenn diese Platrenstapel gleich- 
zeitig geladen werden miissen. Wenn z.B. eine Datei auf 3 Platten= 
stapel verteilt ist, kann mit dem Operanden MT die Nummer der Ein- 
heit mit dem ersten Volume der Datei und mit FE die Nummer der auf- 
einanderfolgenden Einheiten mit den restlichen Volumes angegeben 
werden. Im obengenannten Fall ist FE= 2. Die Nummern der benutzten 
Einheiten mUssen aufeinanderfolgend angegeben werden. Die Werte 
0-9 undA -F werden als eine Sequenz aufgefaft. Dieser Parameter 
ist nur fur Arbeitsdateien auf Platten gultig. 


MR (Multi -Reel) ist nur fur Sortierprogramme auf Band gultig, die benutzt 
werden, wenn eine Eingabedatei aus vielen Spulen oderPlattenstapeln 


besteht und wenn es nicht méglich ist, die vollstdndige Datei mit dem Sortie > 
programm als Einfachdatei zu sortieren. 


Es wird darauf hingewiesen, da mit dem polyphasen System die maxi- 
male Anzahl von Zeichen, die sortiert werden kann, von der Kapazitat 
der Arbeitsbiinder abhiingt. Wenn der Benutzer sicher ist, dal eine voll- 
stdndige Datei mit einem Durchlauf sortiert werden kann, sollte er den 
Parameter MR nicht angeben, selbst wenn die Datenmenge, die sortiert 
werden soll, mehr als eine Eingabespule belegt. 


Bei Verwendung des Parameters MR sind folgende Werte maglich: 


MR =F wenn nicht mehr als 10 Spulen fir die Datei benutzt werden und 
wenn die gesamte Datei bis zum Kennsatz "Ende der Datei™ 
sortiert werden soll. 


MR=n_ (n ist ein dezimaler Wert von 0 - 9) wenn die erste Spule und 
die n darauffolgenden Spulen (bzw. bis zum Kennsatz "Ende der Oo 
Datei" wenn dieser festgestellt wird) sortiert werden sollen. 
MR = Null gibt an, da®B eine Spule sortiert wird, MR =1 gibt an, 
da zwei Spulen sortiert werden, usw. 


Dieser Parameter ist nur fur Sortierprogramme gltig, bei denen die Ein= 
gabe und die Ausgabe auf Band erfolgt. 


-) 
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- Op. 4 RM=n (Band- und Plattendateien) 


Der Parameter RM (Recording Mode) gibt an, daf die Zeichen auf der 
Datei im n-Bit-Modus geschrieben werden; n muB mit 6 oder 7 ange- 
nommen werden. Wenn 8 nicht spezifiziert worden ist, wird der Wert 6 
angenommen. Die 6 verweist auf den 6-Bit~Modus bei Platte oder auf 
7-Spuren bei Bindern, Die 8 verweist auf den 8-Bit-Modus bei Platte 
oder auf 9-Spur-Bander. 


Op. 5 PK = x (Dateien auf Band und Platte) 
Der Parameter PK (Packing Density) gibt die Schreibdichte der Datei an. 


(Magnetband) verweist auf die Schreibdichte von 200 Bits/Zoll 
(Magnetband) verweist auf die Schreibdichte von 556 Bits/Zoll 
(Magnetband) verweist auf die Schreibdichte von 800 Bits/Zol! 
(Magnetband) bedeutet Phasenmodulation (1.600 bpi) 
(Magnetplatte) bedeutet Sektormodus und ist obligatorisch bei 
Plattendateien. 


x xX KM x 
hob ow Wot 
nVoOuaN 


Wenn der Parameter nicht angegeben oder ungiltig ist, werden die 
folgenden Werte angenommen: 


5 fir 7-Spur-Bander 
8  fiirafle anderen Bander 
S fiir Platten 


“ou ou 


x 
x 
x 


Op. 6 PC = Y oder N (Dateien auf Band) 


Es kann Paarigkeitskontrolle (Y) oder Unpaarigkeitskontrolle (N) angegeben 
- . werden. Wenn Y nicht spezifiziert worden ist, wird der Wert N angenommen, 

Plattendateien werden immer mit Unpaarigkeitskontrolle geschrieben und 

die Angabe dieses Parameters ist nicht erforderlich. 


Op. 7 RP = nnn (Fir Ausgabedateien auf Band und Platte) 


Dieser Operand (Sperrdauer) ist fur Ausgabedateien giltig und spezifiziert 
die Anzahl der Tage, die vergehen mu8, bis die Datei erneut beschrieben 
werden kann. 
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22250. | Makrobefeh] FLOP (File Options) | 


Dieser Makrobefeh! enthilt eine Gruppe von Operanden zur Definition der 
Dateiart. Diese Software-Optionen werden durch den Dateinamen in die 


Makrobefehle DVC mit den Hardware-Optionen verkettet. 


Der Befeh] FLOP kann ausgelassen werden, wenn die betreffende Datei 
keine dieser Optionen benutzt. 


Aufbau: FLOP Name, Op. 1, Op. 2, Op. 3, Op. 4, Op. 5, Op. 6, Op. 7 


Dieser Befeh| besteht aus einem obligatorischen Operanden (Name) und 7 
wahlfreien Operanden. : 


Name: Dieser Operand ist der Dateicode, worauf sich der Befehl bezieht; 
er verweist den Befehl FLOP auf den entsprechenden Befehl DVC und mu8 


immer angegeben werden, 
~ Op. 1 LB= S oder N (Eingabedateien auf Band) 


Der Operand LB (Label) ist nur fur Eingabedateien auf Magnetband giltig 
und spezifiziert die Art des Kennsatzes: 


§ = Die Datet hat Standardkennsdtze wie in der Dateforganisation der 


GE-120 oder GE~130. 
N= Die Datei hat nichtstandardméBige Kennstitze. 
Impliziter Wert: S 


Bei nicht-standardmaSigen Kennsdtzen darf der Befehl DVC fur die be- aD 
treffende Datei den Parameter AT oder MR nicht spezifizieren, AuBerdem 
muB in diesem Befehl der ntichste Operand OR definiert werden. 


- Op. 2 OR = NAME (Eingabedateien auf Band) 


Dieser Operand (Eréffnungsroutine) definiert die mnemonische Anfangs- 
Adresse der Zusotzroutine zur Eréffnung der Datei. Bei einem Eingabeband 
mit einem nicht-standardmaBigen Kennsatz (Operand 1, LB = N) mu8 
dieser Operand angegeben werden. Mit "NAME" wird die symbolische 
Adresse des ersten Befehls der Eraffnungsroutine bezeichnet und darf nie- 
rnals mit zwei gleichen Buchstaben beginnen; Doppelsymbole sind fur den 
Generator reserviert. 


Oo 
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Wenn das Band weitere nichi-standardmiBige Eigenschaften aufweist, muB 
die Eroffnungsroutine fir Banddateien mit nicht-standardmaRigen Kenn- 
sdtzen zusammen mit anderen Zusatzroutinen benutzt werden. 


Wenn die Eingabedatei auf Band einen nichi-standardmiBigen Kennsatz 
und keine weiteren Abweichungen aufweist, geniigt die Verwendung der 
Zusatzroutine H, wobei das Band keine Checkpoint-Blécke enthalten 
darf und die erste gefundene Bandmarke wird als Ende des Bandes ange- 
sehen. 


Op. 3 BN = P oder A (Eingabe- und Ausgabedateien auf Band) 


Der Operand BN (Block Nummer) ist nur fur die Eingabe- und Ausgabe- 
© dateien auf Band gUltig. Er spezifiziert das Vorhandensein oder das 
Fehlen der Blocknummern. Der Operand kann zwei Werte annehmen: 


-P : Jeder Block ist dem Standardsystem entsprechend numeriert. 
-A : Die Blécke sind nicht numeriert, Deshalb darf kein Folgetest 
ausgefihrt werden. 
Wenn der Parameter BN fehlt, werden folgende Werte angenommen: 
-BN=P: Wenn im Befehl DVC der Operand 1 mit DV = MT oder SN 
angegeben ist. 


-BN=A: Wenn im Befehl DVC der Operand 1] mit DV = DS oder CR 
oder UN angegeben ist. 


~ Op. 4 OZ =A oder P (Eingabedateien auf Platte) 


} 
gp Der Operand OZ (Overflow Zone) verweist auf eine Overflow-Zone in 
einer Eingabedatei auf Platte, oder daBeine Overflow-Zone vorhanden 
ist, aber ignoriert werden soll, 


Es gibt zwei Werte: 


-A: (Absent) dieser Wert gibt an, daB keine Overflow-Zone vorhanden 
ist, oder dof’ sie ignoriert werden soll. 

-P: (Present) dieser Wert gibt an, daB die Overflow-Zone in das 
Programm eingeschlossen werden soll, 


Fehlt dieser Operand, so wird der Wert OZ = A angenommen, 


O 


GE-1 20/1 30 IO A a ee 
Ref .-Nr.: 32.30.307 D 
Juni 1970 


- 46 - 


- Op. 5 KS = nnn (Eingabedateien auf Platte fur ein Mischprogramm) 


Der Operand KS (Key Size) ist nur fur Mischdateien giltig. Er spezi- 
fiziert die Lange des Schlussels, der vor dem Verkettungsfeld in den 
Sdtzen steht. Dieser Wert wird dezimal angegeben und soll den Satz- 
code nicht enthalten. 


Op. 6 CH= N oder Y (Eingabedateien auf Platte flr eine Mischdatei) 


Der Operand CH (Records Chained) gibt an, ob bei Eingabedateien auf 
Platte fur ein Mischprogramm die Daten aus der Overflow-Zone in die 
letzte Ausgabe aufgenommen werden sollen oder nicht: 


- N: Die Daten werden nicht aufgenommen, © 
- Y: Die Daten werden aufgenommen. 


Op. 7 PM= S oder P oder E oder N (Arbeitsdateien auf Band} 


Der Operand PM = (Positioning Mode) bezieht sich auf Arbeitsdateien 
auf Magnetband: er spezifiziert die Position, von der an die Dateien 
bei einem Sortierprogramm auf Band zur Verfiigung stehen, 


- 5: Standardband mit Test und Neverstellung des Header-Kennsatzes, 


- P: Systemband oder Master Tape, das hinter dem letzten gespeicherten 
Programm verfugbar ist. 
-£: Erste Datei auf Band oder erste Spule, die erhalten werden muB. 
Das Band ist nach dem ersten Kennsatz "End of Volume" oder 
"End of File" verftigbar. Der Header-Kennsatz des Bandes wird 
getestet. Diese Art der Einstellung ist nicht gultig, wenn die i, 
Datei oder die Spule keinen standardméBigen Aufbau hat. 


- Ns Das Band ist schon auf die Stelle eingestellt, von wo ab es als 
Arbeitsdatei benutzt wird. 


Ist dieser Operand nicht definiert worden, wird der Wert PM= S 
angenommen. 


Ist eine Arbeitsdatei eine Mehrfachdatei (siche Operand 3 des Befehls 
DVC) miissen alle Arbeitsbiinder eine standardmé@ige Einstel lung 


haben (PM = S). 


oO 
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2.2.6. 


Sabie 


Makrobefehl FLD (File Description) 


Dieser Befehl muf bei allen Eingabe- oder Ausgabedateien vorhanden sein, 
die mit dem Befehl DVC definiert werden. Arbeitsdateien werden hier nicht 
beschrieben, da die Operanden auf das Dateiformat verweisen und die 
Formate der Arbeitsdateien vom Sortierprogramm bestimmt werden. 


Aufbau: FLD Name, Op. 1, Op. 2,.... . . Op. 12 
Operanden: Dieser Befeh! besteht aus zwei obligatorischen Operanden 
{name und Op. 1) und 11 wahlfreien Operanden, deren Bedeutung nach~ 


stehend beschrieben wird. 


Name: Dateicode, worauf der Befehl verweist. Er mu8 mit dem in dem ent- 
sprechenden Befehl DVC benutzten Code identisch sein. 


xX: Op. 1 BS = nnnnn (Eingabe- und Ausgabedateien) 
\ 


Der Operand BS (Block Size) gibt die maximale Blocklange der Eingabe- 

oder Ausgabedateien an. Bei Eingabedateien auf Karten spezifiziert BS die 
maximale GréBe, welche die Daten aus einer Karte annehmen kénnen, wenn 
alle darin enthaltenen Stitze auf ihre maximale Dimension vergroBert 

werden. Fur alle anderen Dateien mu8 die maximale Ubertragungslange 
angegeben werden, einschlieBlich der Datenfelder, die nicht Ubertragen werden 
oder nicht beim Sortieren oder Mischen teilnehmen. Die Mindestblock- 

gréBe ist 80 in allen Fallen, mit Ausnahme von Kartendateien, wo die 
maximale Blockgréfe 80 ist. 


/ 
yA Op. 2 RT = F oder V oder U (Eingabe- und Ausgabedateien) 


Ler Operand RT (Record Type) spezifiziert die Satzart der Datei. Es gibt 
drei Werte: 


-F: Sdize fester Linge 
-V: Sdtze variabler Linge 
- U: Ungeblockte Satze (nur auf Band und Platte) 


Fehlt dieser Parameter oder ist er nicht richtig angegeben, so wird der 
Wert RT = F angenommen, 
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Bemerkung: 


Beit allen Eingabedateien mit Ausnahme der Eingabedateien in Lochkarten 
bezieht sich der Wert RT auf die Sdtze, bevor sie in die Satzverarbeitungs- 
routine in Sekiton | eingegeben werden, d.h. in dem externen Format, 
wenn sie nicht durch die Blockverarbeitungsroutine bei der ersten Eingabe 
getndert werden. 


Bei Eingabedateien in Lochkarten bezieht sich der Wert von RT auf die 

Sdtze nach Verlassen der Satzbearbeitungsroutine (die notwendigerweise 

Satze fester Lange im externen Format aufweist). Feh!t die Satzbearbei- 

tungsroutine, richtet sich das Format, das hier und in den folgenden drei 

Parametern beschrieben wird, nach den Angaben in Teil 2 dieses Hand- a) 
buches. 


Bei allen Ausgabedateien verweist dieser Operand auf das externe Format 
auf Band oder Platte. 


1 


Op. 3 RL=nnnn 


Der Operand RL (Record Length) verweist auf Sdtze, deren Stadium in den 
Anmerkungen des Operanden 2 erklart ist. Bet Sdtzen fester Linge wird 

die Lange hier angegeben. Bei Stitzen variabler Linge oder bei ungeblock- 
ten Satzen solite dieser Operand weggelassen werden. 


Bemerkung: 


Bei Eingabedateien auf Band oder Platte bezieht sich der Wert von RL auf 
die Sitze, bevor die Operation der Option "LangenkUrzung" ausgefuhrt 


wird. Dp 


Bei Ausgabedateien bezieht sich dieser Operand auf die Satzlinge nach 
einer Anderung durch die Own-Coding- und Druckaufbereitungsroutinen. 


Op. 4 GL= nnn 


Der Operand GL (Greatest Length) spezifiziert die maximale Linge eines 
Satzes in einer Datei mit Sdtzen variabler Lange in denselben Phasen, 
wie sie bei den Operanden 2 und 3 beschrieben wurden. Dieser Operand 
sollte auch benutzt werden, um die maximale Liinge von ungeblockten 
Satzen auf Band zu definieren. 


GE -120/130 Seen ee ne ea eed 
Ref.-Nr.: 32.30.307 D 
dunt 1970 


Oo 


GE-120/130 


-49~ 


Bemerkung: 


In diesem Operanden und dem niéchsten mu der dezimale Wert die zwei 
Zeichen am Anfang des Satzes fir die Satzlange enthalten. 


Op. 4 LL= annn 


Der Operand LL (Least Length) spezifiziert die Mindestliénge eines Satzes 
in einer Datei mit Stitzen variabler Linge in denselben Phasen, wie sie 
bei den Operanden 2 und 3 beschrieben wurden. 


Dieser Operand sollte auch benutzt werden, um die Mindestlange von 
ungeblockten Sdtzen auf Band zu definieren. 


Op. 6 LI = nnn (Ausgcbedateien) 


Der Operand L! (Length Increase} ist fur alle Ausgabedateien, die nicht 
ungeblockt sind, gultig. Er spezifiziert durch einen dezimalen Wert von 
1 - 3 Stellen den max. oder festen Wert, um den die Sitze bei der Aus- 
gabe vergréGert werden, 


Die Verlangerung der Satze erfolgt normalerweise in der Zusatzsektion O 
bei der Satzeingabe. Wenn diese Eingabe nicht erklart und der Operand 

LI spezifiziert ist, werden alle Ausgabestitze automatisch mit nnn / nach 
rechts verlingert. 


Die verliangerten Satze (die entweder automatisch oder durch die Zusatz- 
sektion erstellt werden) missen immer mit den Mindest- und Maximal- 
gréBen ibereinstimmen, die in den Parametern GL und LL fir die Datei 
definiert sind. 


Wenn dieser Operand fehl, kénnen diese Stitze nicht normal vergré8ert 
werden, 


Bemerkung: 


Fur Sdtze, die nicht den erlaubten Mindestwert des Systems haben, ist 
die VergréBerung der Satzléinge obligatorisch. Diese Satze (einschlies- 
lich derjenigen, die durch die Zusatzsektion oder automatisch gedndert 
worden sind) werden durch Leerstellen rechts auf den zuldssigen Mindest- 
wert vergréBert. 
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- Op. 7 LD = nnn (Eingabedateien) 


Der Operand LD (Length Decrease) ist nur fur Eingabedateien gultig. 

Der Operand spezifiziert eine feste Anzahl von Zeichen, die am Ende 
jedes Satzes abgeschnitten werden. Diese Anzahl wird als Dezimaizahl 
von einer bis drei Stellen angegeben. Dieses Verfahren wird automatisch 
vom Hauptprogramm ausgefuhrt, bevor der Sprung in die Satzbearbeitungs- 
routine erfolgt. 


Die abgeschnittenen Stellen durfen keine Felder der Sortierschliussel 
enthalten, 


Die Lange eines verkirzten Satzes mu immer die Grenzen LL und GL 
fur die Eingabestitze bericksichtigen. 


Op. 8 SR= nnn (Eingabedateien auf Band und Dateien auf einem nicht 
definierten Datentriger) 


Der Operand SR (Start Field) spezifiziert die Lange eines Feldes am 
Anfang jedes Eingabeblockes, Werden Sttze aus dem Block entnommen, 
wird dieses Feld ignoriert. Ist der Operand vorhanden, wird die Dezimal- 
zahl aus einer bis drei Stellen angegeben. Liegt eine Banddatei vor und 
sind standardmaRige Blocknummern erklart worden, verweist der Wert nnn 
auf die ersten nnn-Zeichen nach der Blocknummer. 


Dieser Operand ist nicht fur Plattendateien gultig. 
Bei Verwendung von Lochkarten sollte dieser Parameter fehlen, wenn der 


Makrobefehl CFL benutzt wird, da dieser Befehl mehrere vollstindige 
Informationen enthélt, 


Op. 9 DE oder DD oder DL oder DG = ’XX’ oder C (Eingabedateien) 
Dieser Operand kann in 4 verschiedenen Formen angegeben werden: 


DE (Delete if Equal) 
DD (Delete if Different 
DL (Delete if Less) 

DG (Delete if Greater) 
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Dieser Operand ermiglicht in einer Eingabedatei das Léschen aller Sitze, 
die in der relativen Adresse des néchsten Operanden (CC = nnnnn) ein 
Zeichen enthalten, das gleich (DE) ist, unterschiedlich von (DD) ist, 
kleiner als (DL) ist oder gréRer als (DG) ist als das rechts stehende 
Zeichen. Das Vergleichszeichen kann hexadezimal (es wird dann 
zwischen zwei Apostrophe gesetzt) oder als Druckzeichen angegeben 
werden, Wenn das Vergleichszeichen ein Apostroph oder ein Leer- 
zeichen ist, mu@ es in hexadezimaler Form angegeben werden. 


Vor dem Sprung in die Satzbearbeitungsroutine der Zusatzroutine | 
{falls vorhanden) wird der Satz getestet und evtl. geléscht, D.h., 
eliminierte Sdtze kénnen vom Benftzer nfbr in der Blockverarbeitungs- 


<= 
Die Moglichkeit des Léschens ist qutguf |Eingabedateien anwendbar, 
wobei eine Méglichkeit auf jeder [Eiegabf-datei bei Sortier— und Misch- 


Op. 10 CC = nnnn 


= 
Der Operand CC (Control Column) Itefei} die relative Adresse fur den 
Beginn des Satzes indem das Zeichenenthalten ist, das verglichen 
werden soll (stehe Operand 9). S 


Sel 
Operand 10 darf nur dann angege| lefPwelden, wenn der Operand 9 
definiert worden ist. 


Op. 11 SF =Roder A oder M (Eingabedateien auf Platte) 


Der Operand SF (Sorted File) gibt die Art der Ausgabe durch ein Objekt- 
programm an, dessen Eingabe nur auf Platten erfolgt: 
-R: Volistdndige Eingabestitze 


- A: Plattenadressen in der Eingabedatei fur die gemaB den Sortier~ 
. schlUsseln aufeinanderfolgenden Sdtze. 


- M: Plattenadressen, wie unter A, wobei auf jede Adresse die Schlussel 
folgen. Aufeinanderfolgende Zeichen enthalten die Schlussel in 
der spezifizierten Reihenfolge ihrer Wichtigkeit (siehe Makrobefehle 
KEY und SORT). 


Dieser Operand ist nur fur Eingabedateien auf Platten giltig. Wenn 
dieser Operand nicht definiert ist, wird der Wert SF mit R angenommen. 


GE~120/130 ee Ye 
Ref.-Nr.: 32.30.307 D 
Juni 1970 


~5o= 


- Op, 12 LF = xxx (Eingabedateien auf Platte) 


Der Operand LF (Linkage Field) ist nur dann giltig, wenn die Eingabe 
auf Platte und die Ausgabe auf Band erfolgt. 


Durch Angabe der Anzahl! von Zeichen, die vor dem Feld im Satz stehen, 
kann der Benutzer das Eliminieren des Verkettungsfeldes (sofern vorhanden) 


fordern, 


Der Satzcode wird immer automatisch eliminiert, wenn die Eingabe auf 
Platte und die Ausgabe auf Band erfolgt. 


Die Lange der Sdtze nach dem Eliminieren des Verkettungsfeldes darf 
nicht kleiner sein als die fur die Ausgabedatei erklarte Linge. 


Oo 
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Makrobefehl CFL (Card F 
Der Makrobefehl CFL ist erforderlich, wenn die in Karten gelochten Sitze 
nicht die in dem Befeh| FLD definierte Struktur haben. In diesen Fallen 
wandelt die Zusatzsektion | oder das Hauptprogramm die Sutze in das er- 


forderliche interne Format um. 


Wenn die Satze aus Lochkarten schon die in dem Befeh! FLD definierte 
Struktur haben, ist es nicht erforderlich, den Befehl CFL anzugeben. 


Aufbau: CFL Op. 1, Op. 2, Op. 3 
Operanden: 


Dieser Befehl besteht aus drei Operanden, die alle angegeben werden 
missen. Die Anwendung der Operanden wird im folgenden beschrieben: 


- Op. 1 IC =nn 


Der Operand IC (Initial Column) spezifiziert fur alle Karten in der Datei 
die Spalte, die das erste Zeichen des ersten Satzes enthilt. 


- Op. 2 FC=nn + 


Der Operand FC (Final Column) spezifiziert die Spalte, die das letzte 
Zeichen des letzten Satzes in Karten enthalt. 


- Op. 3 RL=nn 


Der Operand RL (Record Length) spezifiziert die feste Lange der Séize in 
Lochkarien. Diese Linge mu ein Faktor der Zahl (FC - IC +1) sein. 
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2.2.8. | Makrobefehl OLAY (Overlay) 


Der Befehl OLAY kann in Sortierprogrammen auf Band und in Sortier- 
programmen auf Plaite mit geringflgig unterschiedlicher Bedeutung be~ 
nufzt werden, : 

ite 
a) Sortierprogramme auf Band 


Mit diesem Makrobefeh! kénnen zwei Dateien ein und dieselbe Bandspule 
belegen. Der Makrobefehl gibt an, da8 die Spulen an bestimmten 
Programmpunkten nicht gewechselt werden, und da deshalb das Sortier- 
programm die Einheit nicht in den Status off-line schalten sollte, 

keine Anforderung fir das Laden einer anderen Spule ausdrucken sollte ey 
und nicht anhalten sollte, um den Spulenwechsel zu erwarten. 


Die Eingabedatei kann von einer Arbeitsdatei, die Ausgabedatei von einer 
Ausgabedatei tberlagert werden oder die Eingabedatei von einer Ausgabedatei. 


Bei Uberlagerung missen die Banddateien so definiert werden, da sie 
dieselbe Einheit mit derselben Einheitennummer belegen. Arbeitsdateien 
kénnen sich nicht untereinander Uberlagern. Die Ausgabedatei kann 
keine Arbeitsdatei Uberlagern, die selbst schon die Eingabedatei Uber- 
lagert. Innerhaib ein und desselben Programms kann eine Arbeitsdatet 
die Eingabedatei Uberlagern und eine weitere Arbeitsdatei kann von 
der Ausgabedatei uberlagert werden. 


Aufbau: OLAY Name 1, Name 2 


Operanden: 
Der Befehl OLAY besteht aus zwei Operanden, die beide angegeben oS 
werden mussen. Ihre Bedeutung wird nachstehend beschrieben: 


Name 1: Code der Datei, die uberschrieben wird. 
Name 2: Code der Datei, die die mit Name 1 angegebene Datei uber- 
schrei Ps 
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b) — Sortierprogramm auf Platte 


Dieser Befehl zeigt die Verwendung desselben Plattenstapels durch 
zwei verschiedene Dateien an. Drei Falle kénnen vorkommen: 


- Beide Dateien belegen dieselbe Zone auf demselben Plattenstapel . 
OLAY ist obligatorisch. 


- Die beiden Dateien belegen Zonen auf verschiedenen Plattenstapeln, 
benutzen aber dieselbe Einheit. OLAY ist obligatorisch. 


- Die beiden Dateien belegen verschiedene Zonen auf demselben 
™ Plattenstapel. OLAY ist nicht obligatorisch, sollte aber benutzt 


werden, 


Folgende Uberlagerungen sind miglich: eine Eingabedatei und eine 
Arbeitsdatei, eine Arbeitsdatei und eine Ausgabedatei oder eine Eingabe- 
datei und eine Ausgabedatei . Uberlagerungen von Arbeitsdateien sind 
nicht maglich, noch kann eine Ausgabedatei dieselbe Arbeitsdatei tiber- 
lagern, die von einer Eingabedatei uberlagert wird. 


OLAY mit Multi-Voiumes-Dateien ist sehr sorgfaltig anzuwenden. 
Alle Volumes der Arbeitsdatei miissen erdffnet sein, bevor das Ende 
der Eingabedatei erreicht ist. 

Aufbau: OLAY Name 1, Name 2 

Operanden: Es miissen beide Operanden angegeben werden. 


Name 1: Code der Datei, die zuerst benutzt wird. 


ee) Name 2: Code der Datei, die als zweite benutzt wird. 
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2.2.9. | Mokrobefehl KEY, j 


Es mufS wenigstens ein Befehl KEY angegeben werden, wenn die Zusatz- 
sektion C nicht benutzt wird. Der Makrobefeht KEY spezifiziert die 
Position des Schlissels, seine Lange, den auszufthrenden Vergleich und 
die Art der Daten. Fir jeden der bis zu max. 16 Schlussel muB ein ge- 
trennter Befeh] KEY angegeben werden. Es miissen nicht immer alle de- 
finierten Schlussel in einem bestimmten Objektprogramm benutzt werden, 
ebenso wenig muB die Reihenfolge der Befehle mit der Bedeutung der 
Befehle Ubereinstimmen. 


Aufbau: KEY-Code, Op. 1, Op. 2, Op. 3, Op. 4 
Operanden: COs 


Der Befehl KEY besteht aus 5'Operanden, deren Bedeutung nachstehend 
beschrieben wird. 


Code: 


Der Code ident ifiziert den Schlussel, er besteht aus zwei Zeichen, wovon 
das erste alphabetisch (auBer Y) und das zweite numerisch sein mu®. Der 
Benutzer gibt den Code beliebig an, wobei jeder Schlissel anders lauten 
muB, 


~ Op. 1 SK = nnnn 


Der Operand SK (Start Key) gibt die linke Adresse des Feldes mit dem 


Schlussel an. Die Adresse wird als Dezimalzah! aus einer bis 4 Stellen 
angegeben. (Soft. ~Codls im Rea nicht bariichsiehbryon bain eéhleu o~ 


oer Pasttionen ), . 


- Op. 2 EK oder KL= nnnn 


Der Operand EK (End Key) definiert die Satzadresse des letzten Zeichens 
im Schlussel. Die Adresse wird als Dezimalzahl aus 1 bis 4 Stellen an- 
gegeben. 


Der Operand KL (Key Length) gibt die dezimale Lange des Schlussels an. 


Die Operanden EK und KL liefern beide dieselbe Information und deshalb 
sollte nur einer von ihnen angegeben werden. Die maximale Lange des 
Schliissels ist entweder 256 oder 16 Bytes, je nach der Art des Vergleiches 
(siehe Operand 4). 


9 
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- Op. 3 SM=A oder D 


Der Operand SM (Sorting Mode) gibt den Sinn des Sortierens hinsichtlich 
dieses Schlissels an. Es kénnen zwei Werte A und D angegeben werden: 


A: Aufsteigende Folge 
D: Absteigende Folge 


Wenn dieser Operand nicht definiert wird, so wird der Wert A implizite 
benutzt. 


Op. 4 KT=1 oder 2 oder 3 


Der Operand KT (Key Type) definiert die Art der Zeichen, die den 
Schlussel bilden. 
KT=1; Der Schlussel wird alphabetisch oder bintir angegeben. 


KT =2: Der SchlUssel wird numerisch angegeben, wobei das linke 
Halbbyte jedes Bytes nicht definiert wird (ungepackt numerisch) 


KT=3: Der Schlissel wird numerisch gepackt mit Vorzeichen angeben. 
Fehlt dieser Operand, so wird der Wert KT = 1 implizite angenommen, 


Wenn KT = 1 ist, kann der Schlissel bis zu 256 Bytes enthalten. 
Wenn KT = 2 oder 3 ist, kann der Schlussel bis zu 16 Bytes lang sein. 


Wenn die natUrliche Lange des Schlussels die zuldssigen Werte Uber- 
schreitet, muB er in zwei oder mehrere Schlussel unterteilt werden, die 
jeweils getrennt spezifiziert werden. 


Bemerkung: 


Wenn die Sttze bei der Eingabe vom Benutzer getindert werden, so dal 
sich die Positionen der Schlussel undern, missen die Positionen nach 

der Anderung in diesem Makrobefehl spezifiziert werden. Bei Platten- 
sitzen, die zu Adressen oder Adressen und Schlisseln verdichtet werden, 
sollten die urspringlichen Positionen angegeben werden. 
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2.2.10. \ Makrobefehle SORT oder MERG) 


Dieser Makrobefehl spezifiziert fur den Generator, ob ein Sortier- oder 
Mischprogramm erstellt werden soll, und liefert die Kriterien fur die 
Definition der Ausgabesequenz. 


Aufbau: SORT oder MERG, Code 1, Code 2,..... Code 16 


Wenn die Vergleichssektion C vorhanden ist, durfen keine Operanden an= 
gegeben werden. 


Wenn die Sektion C fehlt, werden die Code benutzt, um die Schlisse! fur 
das Sortierprogramm auszuwihlen (siehe Makrobefehl KEY). Es ist nicht 
erforderlich, daB alle so beschriebenen Schlussel im Befehl SORT ange- 
geben werden. Es mul} jedoch mindestens ein Schttisse! vorhanden sein 
und die Folge der Code definiert die Reihenfolge, in der der Vergleich 
ausgefuhrt wird. D.h., die Vergleichssequenz beginnt mit Code J und 
fabrt erforderlichenfalls mit Code 2, Code 3 usw. fort, bis eine Unter- 
scheidung erreicht worden ist. Bei Sitzen mit gleichen Schlisseln ist es 
nicht miglich, die endgiltige Sequenz vorauszusagen, obgleich die Zusatz- 
routine O oder M von der Qualitat informiert werden kann und bestimmte 
Aktionen miglich sind. Alle spezifizierten Code missen in den Makro- 
befehlen KEY definiert worden sein. {In einem Befehl SORT oder MERG 
kann derselbe Schlussel-Code nicht zweimal benvtzt werden). 


Wenn dieselbe Datei gema8 einer Anzahl von verschiedenen Schliisseln 
sortiert werden soll, ist es méglich, alle méglichen Schliissel durch Makro- 
befehle vom Typ KEY zu definieren und lediglich den Makrobefeh! SORT 
zu andern, sofern die benutzten Einheiten dieselben bleiben, 


Die Reihenfolge, in der die verschiedenen Makrobefehle KEY angegeben 
werden, ist bedeutungslos. 
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Oo 
pS a ee 
2.2.11. \ Makrobefeh! USE 


Dieser Makrobefeh| mu8 fur jede benutzte Zusatzsektion 1, O oder M 
angegeben werden. 


Aufbau: USE A, Name l,.... . Name N 

Operanden: 

Es missen der Operand A und mindestens ein Name angegeben werden. 
A stellt die Zusatzsektion dar: 


@O ct: Zusatzsektion flr die Eingabe 
- O oder M: Zusatzsektion fur die Ausgabe 


Die Namen mussen aus der Liste der Verkettungspunkte, die in Abschnitt 3 
beschrieben sind, ausgewahit werden. Es gibt folgende Werte: 


= Fir Sektion I: NN1, NN2, NN3, NN4, NN5, NN6é, NN7 
- Fur Sektion O oder M: PP1, PP2, PP3, PP4 


Die erforderliche Verkettung mu in dem entsprechenden Befeh! USE an- 
gegeben werden, 


Wenn die Sektion | und die Sektion O angegeben wird, mUssen separate 
Befehle USE benutzt werden. Die Reithenfolge ist ohne Einflus, 


Furdie Sektionen C und H durfen keine Befehle USE angegeben werden. 
—O Die Definitionsfolge der Verkettungspunkte ist ohne Bedeutung. 


In diesem Befeh! durfen die Rucksprungpunkte in das Hauptprogramm (SS usw.) 
und die Datenaustauschzonen (DDI usw.) nicht spezifiziert werden. 


Die APS~Befehle, die die Sektionen bilden, dirfen an diesem Punkt nicht in 
das Ursprungsprogramm eingeflgt werden. 
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2.2.12. | Makrobefehl EAPS (Enter APS) _| 
a i 


Wenn eine Zusatzsektion in dem Ursprungsprogramm angegeben wird, ist 
die Angabe dieses Befehls obligatorisch. 


Der Befehl gibt dem Generator an, da die folgenden Befehle in der APS- 
Programmiersprache 120/130 abgefa8t sind (auBer SECT, ESCT und END). 


Aufbau: EAPS (Kommentar) 
Operanden: 


Es ist kein Operand erforderlich und das Feld kann fur Kommentare benutzt oO 
werden. 


Oo 
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2.2.13. : Makrobefehle SECT (Section) und ESCT (End Section) | 
an 


Der Makrobefeh! SECT verweist auf den Beginn der APS-Befehle, die eine 
spezielle Zusatzroutine bilden. Der Makrobefehl ESCT verweist auf das 
Ende der APS-Befehie 


Aufbau: SECT A oder ESCT A 
Operanden: 


Der einzige Operand dieser zwei Makrobefehle ist der Code A, der den 
Namen der Sektion angibt. Er kann die folgenden Werte haben: 


-C:  Zusatzsektion fur den Vergleich 
-H: = Zusatzsektion fur die Dateiersffnung 
-l:  Zusatzsektion fur die Eingabe 

- O oder M: Zusatzsektion fur die Ausgabe 


Der Code A kann in dem Befehl ESCT ausgelassen werden, jedoch nicht in 
dem Befehl SECT, Der Code darf nie von dem entsprechenden Befehl SECT 
abweichen, 


Vor jeder Zusatzroutine muB ein Befehl SECT und nach jeder Zusatz- 
routine ein Befehl ESCT stehen, mit Ausnahme in der letzten Zusatzroutine 
des Ursprungsprogramms, wo der Befehl END folgt. 


Die Reihenfolge der Zusatzsektionen in dem Ursprungsprogramm ist ohne 
Bedeutung. 
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2.2.14, | Makrobefehl * (Kommentar) 


Mit diesem Befeh! kénnen Kommentare an jedem beliebigen Punkt des 
Ursprungsprogramms eingefugt werden. 


Aufbau: * (Kommentar) 
Operanden: 


In das Operandenfeld dieses Befehls wird der Kommentar eingetragen. 
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ones 


2.2.15. | Makrobefehl END| 


Dieser Befehl teilt dem Generator das Ende des Ursprungsprogramms mit. 
Aufbau: END (Kommentar) 
Operanden: 


Es sind keine Operanden erforderlich, Die Operandenzone kann Fur 
Kommentare benutzt werden, 


oO 
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2.2.16) KEND Card 


Dieser Befehl, der immer in einer Lochkarte steht, signalisiert das Ende 
der Daten im Kartenleser, Der vorhergehende Befehl END kann auf Band 


oder Platte stehen, 


he ee 
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Zusatzsektionen 


Es ist zuliissig, in APS kodierte Sektionen in das Ursprungsprogramm ein- 
zufigen, Diese Sektionen werden als Teil des Objekiprogramms aufgefa8t 
und sind Sektionen im normalen APS-Sinn (siehe Handbuch APS-Programmier- 
sprache). 


Diese Sektionen werden vom Benutzer den speziellen Phasen des Sortier- 
oder Mischprogramms zugeordnet, z.B. der Vergleichsphase oder der 
endgultigen Ausgabe. Jede Sektion enthalt mindestens einen Verkettungs~ 
punkt, Jede Verkettung ist der mnemonische Name fur den Eintrittspunkt 
einer Routine und dieser Name wird aus einer dem Generator bekannten 
Liste ausgewahlt. Jeder Verkettungspunkt witd durch diesen Namen einer 
Stufe zugeordnet, die gerade bearbeitet wird, und das Objektprogramm wird 
durch einen Sprung auf den mnemonischen Namen auf der entsprechenden 
Bearbeifungsstufe gebildet, Diese Stufen ergeben sich z.B. in der letzten 
Ausgabephase jedesmal, wenn ein Satz fur die Ausgabe ausgewuhlt wird, 
wobei die Méglichkeit besteht, den Satz zu eliminieren oder zu verarbeiten, 
sowie in der letzten Ausgabephase, wenn der letzte Satz fur die Ausgabe 
vorbereitet worden ist, wobei Summenstitze addiert werden kénnen, indem 
Daten vom letzten Saiz benutzt werden. In diesem Falle definiert der Be- 
nuizer den Sektionsnamen als einen Makrobefehl SPG, der dem Generator 
die zwei Verkettungspunkte angibt und die Phase des Sortierprogramms, wo 
die Kompilierung stattfindet. Im resultierenden Objektprogramm gibt es 
Sprungbefehle zu diesen Punkten auf den entsprechenden logischen Stufen 
und nicht zu anderen Verkettungspunkten in derselben Sektion, wenn sie 
nicht in dem Makrobefehl verlangt worden sind. 


Es gibt folgende Zusatzsektionen: 


-C:  Vergleichssektion, Sie kann in allen Programmen angegeben werden 
und erlaubt dem Benutzer, eine nicht-standardmaBige Methode fur 
die Definition der Sequenz zur Verfiigung zu stellen, 


-H: — Eroffnungssektion. Diese Sektion ist in Sortierprogrammen auf Band 
und auf Platte miglich,und sie erlaubt dem Benutzer eine Eingabe~ 
datei auf Band zu eréffnen, die einen nicht-standardmaBigen 
Header-Kennsatz oder Header-Kennsiitze hat, 


-k Eingabesektion, Sie ist in Sortierprogrammen auf Band und Platte 
méglich. Sie erlaubt dem Benutzer Eingabedaten fur den Druck 
vorzubereiten und besondere MaGnahmen in auBergewohnlichen 
Situationen zu ergreifen, z.B. bei END OF VOLUME, 
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- © und M: Sortier- und Mischsektionen. Sie erlauben dem Benutzer Aus- 
gabedaten fir den Druck vorzubereiten und spezielle MaBnahmen 
in auBergewohnlichen Situationen zu ergreifen, 2.B. Summensitze 
auf die sortierte Datei zu addieren, 


C und H haben einen einzigen Eingabepunkt. Es sind kaum Verwechslungen 

moglich. Die anderen Sektionen haben mehrere und verschiedene Kommuni- 
kationszonen, Es ist wichtig zu verstehen, welche symbolischen Adressen in 

der Zusatzsektion und welche im Hautprogramm stehen. Alle Adressen vom 

Typ SST, $S2 usw. beziehen sichauf Befehlskennsdtze im Hauptprogramm. 

Alle Adressen vom Typ DD1, DD2 usw. beziehen sich auf Kommunikations- 

zonen im Hauptprogramm. Alle verbleibenden Adressen NN1 bis NN7 und 

PPT und PP4 beziehen sich auf Befeble in den Zusatzsektionen selbst. Das 
Hauptprogramm springt auf diese Adressen, wenn sie in dem entsprechenden oO 
Makrobefehl USE erklart worden sind. 


Die Zusatzsektionen gestatten die Anwendung spezieller Druckaufbereitungs- 
verfahren, die nicht als standardmafige Optionen in .SPG zur Verftigung 

_ stehen, Diese Verfahren kénnen sein: das Eliminieren von Sttzen in Uber- 
einstimmung mit speziellen Kriterien, die Akkumulation von zusammen= 
fassenden Daten der vollstandigen Ausgabe- oder Eingabedateien, Ande- 
rungen des Aufbaus von Eingabe- und Ausgabesdtzen usw. in Uberein= 
stimmung mit den im folgenden beschriebenen Regeln. 


Diese Routinen mUssen vor der Karte END fn das Ursprungsprogramm einge- 
fugt werden, Das Vorhandensein dieser Routinen mu auch durch den Makro- 
befehl USE angegeben werden, mit Ausnahme der Sektionen C und H, wo 
der Hinweis aus den Parametern ersichtlich ist. 


Die Zusatzsektionen kénnen alle APS-Befehie und alle Makrobefehle ent- 
halten, mit Ausnahme der Befehle, die sich auf die Eingabe/Ausgabe be- gd 
ziehen (GET, PUT usw.). Fir die Steuerung der Randeinheiten benutzen 

die Sektionen das Basic Input/Output-System oder die Bibliotheks-Sub- 

routinen, die mit dem Befeh| SUB angerufen werden. 


Die Sektionen bestehen dadurch aus einer Routine oder einer Anzahl von 
Routinen, die auch verkettet sein kénnen, Es kénnen alle 67 mnemonischen 
APS-Befehle benutzt werden (siehe Anhang D der Handbtcher GE-120 und 
GE-130) sowie eine beschrankte Anzahl von Makrobefehlen.. 
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Die folgenden 20 Makrobefehle durfen nicht benutzt werden: 


- ADS (Add Signed Decimal} 

- CALL (Call a Segment) 

- CHKP (Checkpoint) 

~ CLOS {Close File) 

~ CLOSE (Close File) 

- DHP (Parameter Definitions) 

- DIVS (Divide Signed Decimal) 
- ENTRY  . (Name Usable in All Sections) 
~ESGM (End Segment} . 

- FILE (Define File) 

- GET (Get a Record) 

~ MULS (Multiply Signed Decimal) 
- NEXT (Change of Reel) 


oO ~ OPEN (Open File) 


- PROG (Program Name) 


- PUT (Write Record) 

- RLS (Unload Reel) 

- SDS {Subtract Signed Decimal) 
- SKIP (Trow to Head~of -form) 

- STRT (Start Address) 


Die Einschriinkungen beziehen sich hauptsdchlich auf die Ubertrige fur 
Randeinheiten und auf die Segmentierung. Die Segmentierung ist nicht 
zulassig und die Ubertrage auf Randeinheiten ist auf diejenige beschrankt, 
die nicht die Ubertrage berthrt, die vom Hauptprogramm ausgefuhrt werden. 


Die 4 arithmetischen Makrobefehle ADS, DIVS, MULS und SDS sind als 
Anrufe der Subroutinen zuldssig: 


SUB YYADS usw. 
worauf die entsprechenden DC-Erklarungen folgen, 


Die Makrobefehle fur die Eingabe und Ausgabe sind wegen der Einschriin- 
kungen des APS-Assemblers nicht erlaubt. 


Die folgenden Subroutinen sind nicht zuldssig: 


~ YOPN 

- YCLOSS 
~ YCHKP9 
- YOPCL 
- YDCK 
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Die Anrufe der Subroutinen des BIOS wie: 


-* READ 
-* MTAPE 


sind in dieser Form nicht zulassig, sie kénnen jedoch in der kompilierten 
Form benutzt werden: Ein Befehl JRT, woraus eine oder mehrere DC-Er- 
kldrungen folgen. Die Subroutinen kénnen mit dem Makrobefeh! SUB an- 
gerufen werden. 


Der Befehl ORG kann nicht mit einem symbolischen Namen angerufen 

werden, sondern in der Form *ORG + dezimaler Wert, worauf dabei ge- 

achtet werden mu8, daB die sich ergebende absolute Adresse innerhalb oO 
der Subroutine selbst liegt. Andernfalls liegt eine Fehlerbedingung vor, 

und die Generierung ist nicht zulassig. Der dezimale Wert darf in dieser 

Form den Wert 4096 nicht Uberschreiten. Der Befehl ORG kann auch mit 

einer absoluten Adresse benutzt werden, die entweder kleiner als die An- 
fangsadresse des Programms sein muB (im Befehl STRT) oder innerhalb der 

Zone “Common Storage" liegen mu8 (im Befehl OBJP angegeben). Der 

Befehl ORG kann auch mit R angegeben werden, wodurch das nichste Vielfache 
von 256 als Adresse eingesetzt wird, sofern es nicht schon geschehen ist. 

Von dieser Méglichkeit wird abgeraten, da die Routine um weitere 255 Bytes 
vergréBert werden muB, die aus der Arbeitszone in dem Sortier- oder Misch- 
Programm entnommen werden, 


Wenn eine oder mehrere Subroutinen durch den Befehl SUB von mehreren 
Zusatzroutinen angerufen werden, dann werden diese Subroutinen auf der 

Startadresse des generierten Programms gespeichert und die Summe ihrer 

Langen steht immer im Kernspeicher (einschlieBlich der Langen weiterer 

Subroutinen, die von den primtren Subroutinen angerufen werden). Daher OQ 
wird abgeraten, eine Subroutine in mehr als einer Zusatzroutine zu be- 

nutzen. Zwar wird in diesem Falle keine Fehlerbedingung angenommen, 

aber die SPG-Arbeitszone wird verkleinert. 


Falls diese Fehlerbedingung eintritt, sotlte die Startadresse in dem Befeht 
STRT nicht getindert werden, um die gemeinsamen Subroutinen zu kompen- 
sieren. Der APS-Assembler ordnet automatisch die gemeinsamen Subroutinen 
von der Startadresse an in das Objektprogramm ein. 


Die Definitionsbefehle DC und DS sind in den Zusatzroutinen erlaubt, 
ebenso die Befehle DJEC und LF. 
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Wenn in einer Zusatzroutine die BIOS-Subroutinen Uber einen Befeh! JRT 
benutzt werden, darf der Kanal 3 nicht belegt werden, da er vom SPG be- 
nutzt wird. Andernfalls resultieren flr das Hauptprogramm und die Zusatz- 
sektion unbestimmte Ergebnisse. 


In den APS~Befehlen dirfen die vom Benutzer definierten Namen nicht mit 
zwei gleichen Buchstaben beginnen. 


Die Zusatzsektionen werden auf den folgenden logischen Stufen in das 
Objektprogramm eingefiigt: 


- Bei jedem Vergleich zwischen zwei Sttzen (Vergleichssektion C). 
- In der Vorphase (Sektion H fur die Dateieréffnung) 


= Beim Lesen und Andern einer Eingabedatei (Eingabesektion 1) 


- Im letzten oder einzigen Durchlauf, wo die Daten in die Ausgabedatei 
Ubertragen werden (Sektion © fur die Ausgabe bei einem Sortierprogramm 
und M fur Ausgabe bei einem Mischprogramm), 


Die Steverung der Verarbeitung kann in verschiedenen Phasen vom Haupt- 
programm zu einer Zusatzroutine Ubergehen. Die Zusatzroutinen kénnen 
an verschiedenen Punkten und in verschiedenen Kommunikationsformen in 
das Hauptprogramm zurtickspringen. 
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Vergleichssektion C 


Damit kann der Benutzer seine eigenen nicht-standardmaGigen Kriterien 
benutzen, um die Satzfolge zu definieren. Bei den gegebenen Adressen 
zweier Sdtze mu der Benutzer lediglich bestimmen, welcher Satz zuerst 
in der letzten Ausgabe stehen mu8, 


Fur jeden Vergleich erfolgt der Sprung in diese Sektion auf die symbolische 

Adresse QQCOMP. Beim Sprung in diese Sektion enthalten die Register 5 

und 6 die Adressen der.zu vergleichenden Sttze. Der Sprung erfolgt durch 

einen Befehl JRT. Nach dem Vergleich erfolgt der Riicksprung in das 

Hauptprogramm durch einen Sprung auf die Adresse, die in den Positionen 

254 und 255 (Register 7) steht, wobei die Vorrangigkeit angegeben wird. a 
(A und B sind die Sdtze, deren Adressen in den Registern 5 bzw. 6 stehen). a 


(1) B steht vor A: UF/OF = 0, ZE/NZ=1 
(2) A und B sind gleichrangig: UF/OF = 1, ZE/NZ=0 
(3) A steht vor B: UF/OF =1, ZE/NZ = 1 


Diese Sektion wird flr den Vergleich von Schlusseln benutzt, die nicht 
aus dem standardmaBigen Zeichensatz gebildet sind. Die gewohnlichen 
Vergleichsbefehle fuhren hier zu falschen Ergebnissen. 


Die Verwendung dieser Sektion ist obligatorisch. Wenn in den SPG- 
Makrobefehlen keine Schlissel definiert sind und umgekehrt, darf diese 
Sektion nicht benutzt werden, wenn in den Makrobefehien die Schlissel 


definiert worden sind. 


Alle Register miissen erhalten bleiben. 


\e) 
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Sektion H fur die Dateierdffnung 


Diese Sektion mu und darf nur dann angegeben werden, wenn eine Eingabe- 
datei auf Band mit einem nicht-standardmaBigen Header-Kennsatz definiert 
worden ist (d.h. ein Kennsatz, der nicht durch die Standard-Subroutine 
YOPN eréffnet werden kann). Die einzige symbolische Adresse, die fur die 
Kommunikation mit dem Hauptprogramm zur Verfiigung steht, enthalt den 
Operanden OR im Makrobefeh! FLOP des SPG. Die Verkettung zwischen dem 
Haypiprogramm und der Zusatzsektion H erfolgt durch einen Sprungbefehl JRT 
auf diese Adresse und der Rucksprung durch einen Sprungbefeh! JU auf die 
Adresse in den Positionen 254 und 255 (Register 7). 


In der Dateitabelle fur die Eingabedatei steht die von der Zusatzsektion H 
bendtigte Information, Diese Tabelle kann adressiert werden, wobei der 
Dateicode, der als symbolischer Name benutzt wird, der linken Adresse der 
Tabelle entspricht. Dieser symbolische Name steht in den Makrobefehlen 
DVC, FLOP und FLD fur die Datei. 


Der Zugriff auf die Dateitabellen ist nur den Eingabedateien gestattet, die 
mit nicht-standardmaBigen Kennstitzen definiert worden sind. Die Basis- 
adresse der relativen Dateitabelle wird symbolisch als der Name definiert, 
der in dem Makrobefehl DVC fur die Datei angegeben worden ist. 
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2.3.3. Eingabesektion | 


Wihrend der ersten Eingabephase wird diese Sektion vom Generator in das 
Objektprogramm eingegeben. 


a) NN (Nach dem Eréffnen der Dateien) 


Diese Verkettung erfolgt durch efnen Befehl JRT auf die Adresse NNI, 
unmittelbar nach der Eréffnung der Dateien und unmittelbar vor dem 

Lesen oder Schreiben von Daten. Der RUcksprung in das Hauptprogramm 

erfolgt durch einen Befehl JU auf die Adresse 252, wo ein Sprungbefehl 

auf die Adresse gespeichert ist, die in den Positionen 254 und 255 des 
Kernspeichers steht. Deshalb miissen die Adressen 252 bis 255 (die oO 
Register 6 und 7) erhalten bleiben. 


b) NWN2 (nach dem erneuten Starten) 


Diese Verkettung wird bei analogen Bedingungen, wie unter NNi 
genannt, benutzt. Z.B. kénnen spezielle Felder ernevert werden oder 
eine Datei kann auf einem nichtdefinierten, Datentrager neu einge- 
stellt werden (eine derartige Datet wird immer vom Benutzer direkt 
kontrofliert}. 


Die Verketiung erfolgt durch einen Befeh| JRT auf die symbolische 
Adresse NN2. Der Riicksprung in das Hauptprogramm erfolgt durch 
efnen Befehl JU auf die Adresse 252, wo ein Sprungbefeh! auf die 
Adresse gespeichert ist, die in den Positionen 254 und 255 des Kern- 
speichers steht. Die Adressen 252 bis 255 (Register 6 und 7) missen 
erhalten bleiben, 


c) NN3 (Bei jeder Blockeingabe) go 


Nach dem Lesen jedes "physikalischen Elementes" (d.h. einer Page 
auf Platte eines Bandblockes, einer Lochkarte) erfolgt diese Ver- 
kettung durch einen Befehl JU auf die Adresse NN3. 


Die Routine kann das Element priifen, dessen Anfangsadresse in der 
symbolischen Position DDT steht. 


ce) 
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Die Routine kann das physikalische Element annehmen oder zurlick- 
weisen. Im ersten Falle erfolgt der Ruicksprung in das Hauptprogramm 
durch einen Sprung auf die symbolische Adresse SST. Im zweiten 
Falle erfolgt der RUcksprung auf die symbolische Adresse $2. Diese 
Adressen sind die Header-Kennsatze der logischen Programmsektionen, 
die im Hauptprogramm immer vorhanden sind. Die Annahme oder die 
Zurdckweisung erfolgt durch die Auswahl des entsprechenden Ruck- 
sprunges und in beiden Fallen wird ein neues Element eingegeben, 
wenn der ndchste Sprung auf NN3 erfolgt. 


In der Zone DD4 wird die Adresse plus 1 des letzten Zeichens vom 
physikalischen Element gespeichert. Bei nicht-standardmafigen Blécken 
oO muB diese Adresse getindert werden. Es wird daruf hingewiesen, da8 


die Blockgréfe nicht die maximale GréRe Uberschreiten darf. 


Die Routine kann auch das physikalische Element, das sie im Augen- 
blick prift, zurickweisen und alle folgenden Daten in der Datei 
ignorieren. Durch einen Sprung auf die symbolischen Adressen SS6 
oder $85 im Hauptprogramm kann “Ende des Datentrtigers" oder "Ende 
der Datei" simuliert werden, Durch Anwendung dieser Méglichkeit 
kann eine Eingabedatei mit einer nicht-standardma@igen Darstellung 
von "Ende der Datei" abgeschlossen werden. 


Die Eingabe von einem nicht-definierten Medium ist auf diesen Punkt nicht 
miglich, dagegen mu8 der Benutzer die Blécke in das Hauptprogramm 
eingeben (siehe NN7). 


d) NN4 (Fir jede Satzeingabe) 


Dg Diese Verkettung erfolgt durch einen Befehi JU auf die Adresse NN4, 
nachdem die Prozeduren fur die standardméRige Druckaufbereitung aus- 
gefuhrt worden sind, Jeder Satz wird dem Benutzer zur Verfiigung ge- 
stellt. Der Benutzer kann die Register vollstandig belegen. 


Die Funktion, die die Sektion an diesem Punkt ausfuhren kann, héingt 
von dem Datentriiger der Eingabedatei ab (Band, Platte, nicht-definierter 
Datentrtiger oder Lochkarten). 


Beim Sprung in die Sektion I auf die symbolische Adresse NN4 wird 
die Anfangsadresse des Satzes in DD2 gespeichert mit Ausnahme von 
Lochkarten fur Sitze im internen Format mit variabler Lange. 
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Steht die Datei auf Magnetband, Platte oder einem nicht-definierten 
Datentrager, kann die Routine | den Satz entweder annehmen oder 
zurckweisen. Der Rucksprung in das Hauptprogramm erfolgt auf die 
symbolischen Adressen $53 (Annahme} oder $54 (Zurtickweisung). 


Bei der Eingabe auf Lochkarten (primure oder sekundare Datei) kann 

die Routine | wieder den Satz annehmen oder zuriickweisen, wobei 
dieselben Ricksprungadressen benutzt werden. Angenommene Sittze 
kénnen auch in ihrem Aufbau und in ihrer Lange gedndert werden. 

Nach der Anderung miissen die Saitze das fur die Datei beschriebene 
interne Format haben. D.h., diese Routine wandelt abweichende Formate 
auf Karten in das interne Satzformat um. Fehlt diese Routine, so erfolgt 
die Anderung durch das Hauptprogramm, Wenn das interne Satzformat 

mit variabler Lange angegeben ist, werden die Kartenstitze auf der oO 
Adresse plus 2 gespeichert, die in DD2 steht. Es sind zwei Positionen 
vorgesehen, wo die Sektion | die genderte Satzlange speichern kann. 


Eingabesttze kénnen verkiirzt werden: Diese Operation wird automatisch 
vom Hauptprogramm ausgefthrt, wenn die verkirzte Ltinge einen festen 
Wert fir die Datei hat (dieser Wert wird im Operanden LD des Makrobefehls 
FLD angegeben). Wenn die VerkUrzung nicht konstant ist sondern von 

den jeweiligen Sdtzen abhingt (das trifft nur fur Sdtze variabler Lange 

zu), so mu die neve Lange in den ersten zwei Zeichen der Satze an- 
gegeben werden. Die Mindestlénge und die maximale Lange, wie sie 

in dem Makrobefehl FLD definiert worden sind, mu8 beriicksichtigt werden. 


Die Routine kann auch den gepriften Satz und alle weiteren Sdtze auf 
dem Datentriger oder in der Datei ignorieren. Durch einen Sprung auf 
die symbolischen Adressen SS6 oder SS5 im Hauptprogramm kann "Ende 
des Datentragers" oder "Ende der Datei" simuliert werden. 2 


e) NWNS5 (Ende des Dateniriigers) fiir Banddateien 


Die Verkettung erfolgt durch einen Befehl JU auf die symbolische 
Adresse NN5, wenn wahrend des Lesens der Eingabedatei auf Band 
“Ende der Datei" oder "Ende des Datentrigers” festgestellt wird. 


Die Adresse des gelesenen Kennsatzes steht in der Position mit der 
symbolischen Adresse DD7. 


oO 
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Die Routine kann in das Hauptprogramm zurtickspringen, und AbschlieBen 
der Datei oder Wechsel des Datentrigers fordern. Es gentigt, auf die 
symbolische Adresse SS5 im Hauptprogramm bei "Ende der Datei” und 

auf die symbolische Adresse $86 bej "Ende des Datentragers" zurtick- 
springen. Der Benutzer kann die Register voll belegen. 


f) NN6 (Wechsel der Randeinheit) 


Diese Verkettung erfolgt durch einen Befehl JRT auf NNé, wenn der 
Wechsel der Eingabeinheit bei Eingabe von gemischten Dateien erfolgt. 
(Es wird darauf hingewiesen, da das Band, die Platte oder eine nicht 
definierte Datei bis zum Ende gelesen wird). 


oO Der RUcksprung in das Hauptprogramm erfolgt mit einem Befehl JU auf 
die absolute Adresse 252, wo ein Sprung auf die Adresse gespeichert 
ist, die in den Positionen 254 und 255 des Kernspeichers steht. Die 
Adressen 252 bis 255 (Register 6 und 7) mUssen erhalten bleiben. 


g) NN7 (Anforderung eines Blockes) 


Die Verkettung erfolgt mit einem Befehl JU auf NN7, wenn die Ein- 
gabe von einem nicht-definierten Datentriiger erfolgt, jedes Mal, 

wenn ein never Block von Ausgabedateien vom Hauptprogramm gefordert 
wird. Die Register kinnen voll belegt werden. 


Die Adresse, wohin das erste Zeichen des Blockes eingelesen wird, 
steht in der symbolischen Position DDI. Diese Adresse andert sich 
wihrend des Ableufes des Sortierprogramms nicht und wird immer vor 
einer Eingabe neu generiert. Beim Lesen darf der Kanal 3 nicht be- 
nutzt werden. Die Routine muG die Adresse vom letzten Zeichen des 
Dd Blockes plus | in die symbolische Position DD4 Ubertragen und muB 
auf der symbolischen Adresse SS7 in das Hauptprogramm zurtickspringen, 
auBer wenn "Ende der Datei" festgestellt wird. In diesem Falle erfolgt 
der Rucksprung auf die symbolische Adresse $S5, und die Datei wird als 
abgeschlossen angesehen. 


Der Block muB das interne Format haben, das in dem Makrobefehl FLD 
fur die Datei erklart worden ist, wahrend das Format auf dem externen 
Datentriiger Fur das Hauptprogramm unwichtig ist. Der Block darf 
dennoch niemals die im Operanden BS des Makrobefehls FLD ange~ 
gebene Linge Uberschreiten. 
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2.3.4, Ausgabesektionen O und M 


Diese Sektion wird vom Generator in das Objektprogramm wihrend des 
letzten Durchlaufes eines Sortierprogramms eingefiigt. Es wird darauf hin= 
gewiesen, dal diese Routine sich auf die endgiltige Ausgabe bezieht. Der 
Satzaufbau kann vom Benutzer getindert werden und die Sequenz ist die 
letzte Sequenz, wenn sie von dieser Sektion nicht gedndert wird. 


a) 


b) 
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PPI (Beginn der letzten Ausgabe) 


Diese Verkettung wird durch einen Befehl JRT auf die Adresse PPT 
unmittelbar vor dem letzten Durchlauf des Sortierprogramms ausgefihrt. 


Der Riicksprung erfolgt durch einen Befeh! JU auf die Adresse 252 

(wo ein Sprungbefehl auf die Adresse enthalten ist, die in der Position 
254 und 255 steht). Daher missen die Adressen 252 bis 255 (Register 6 
und 7) erhalten bleiben. 


PP2 (Satzdarstellung) 


Diese Verkettung erfolgt durch einen Befehl JU auf die Adresse PP2 
jedesmal, wenn ein Satz als der nachste Satz in der letzten Sequenz 
ausgewdhlt wurde, bevor er jedoch in dem Ausgabeblock gespeichert 
worden ist. In der Kommunikationszone DD2 wird die Adresse des 
néchsten Satzes in der letzten Sequenz und in DD3 die Adresse des 
vorhergehenden Satzes der letzten Sequenz gespeichert, die ebenfalls 
nicht in den Ausgabeblock Ubertragen worden ist. Fir den Ricksprung 
stehen zwei symbolische Adressen SS3 und $S4 zur Verfugung. Bei 
jeder Eingabe wird das Vergleichsergebnis zwischen den zwei Sdtzen 
zur Verfiigung gestellt. Wenn die von DD2 und DD3 definierten Sitze 
gleich sind, setzt das Hauptprogramm die Indikatoren ZE/NZ auf 
Null; sind sie ungleich, werden die Indikatoren ZE/NZ auf 1 gesetzt 
und der von DD3 definierte Satz wird zuerst ausgegeben. 

Es ist zu beachten, da DD3 bei der ersten Efngabe bindr Null! enthalt. 


Die vallstindige Belegung der Register ist gestattet, 
~ Eliminieren des Satzes, dessen Adresse in DD2 steht: 


Der Riicksprung auf $54 eliminiert automatisch den Satz, dessen 
Adresse in DD2 steht. Der Satz, dessen Adresse in DD3 steht bleibt 
unvertindert und wird nicht in den Ausgabeblock Ubertragen. Bei 
der ntichsten Eingabe auf PP2 wird ein never Satz in DD2 zur Ver= 
fGgung gestelit, wihrend DD3 unverdndert bleibt. 
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- Inhalts- und GréBenténderung des Satzes, dessen Adresse in DD3 steht: 


Fur die Anderung erfolgt der Rucksprung auf $$3 durch die Zusatz- 
routine, nachdem der in DD3 angegebene Satz gedndert worden ist. 
Wenn die Satzltinge getindert wird (nur fur Sttze variabler Lange) 
mussen die zwei Zeichen fiir die Langenangabe fortgeschrieben 
werden. Beim Riicksprung speichert das Hauptprogramm den ersten 
Satz (durch DD3 definiert) in den Ausgabeblock. Bei der nachsten 
Eingabe auf PP2 sind die von DD2 und DD3 definierten Sutze getindert 
worden, wihrend DD3 die Adresse des Satzes enthalt, der vorher auf 
DD2 stand. DD2 definiert jetzt einen vorher noch nicht dargestellten 
Satz. 


Einftigung eines neven Satzes 


0 


Die Adresse des einzufUgenden Satzes wird in DD2 gespeichert und 
der Ricksprung in das Hauptprogramm erfolgt auf die symbolische 
Adresse $53. Dadurch wird der vorher von DD3 definierte Satz un- 
widerruflich gespeichert und durch den neven Satz ersetzt. Bei der 
nachsten Eingabe enthalt DD3 die Adresse des eingefligten Satzes 
und DD2 enthalt den Wert, der vorher darin gestanden hat, d.h. 
die Adresse des Satzes, der unmittelbar auf den eingefiigten Satz 
folgt. Es kénnen weitere Stitze mit derselben Technik eingefiigt 
werden, jeweils ein Satz pro Sprung auf PP2. 


Léschen von Satzen mit gleichen Schliisseln 


Die Adressen ungleicher Sdtze stehen in DD2 und DD3, wobei der von 
DD3 definierte Satz den kleineren Schlussel hat (bei aufsteigender 
Sortierung) bzw. den gréGeren Schlussel (bei absteigender Sortierung). 


Die Satzfolge mit gleichen Schlusseln kann nicht auf ihre relativen 
Positionen bei der Anfangseingabe bezogen werden. 


An dieser Stelle kann die Zusatzsubroutine die Adresse von DD3 nach 
DD2 und von DD2 nach DD3 Ubertragen. Damit wird angezeigt, dab 
beim Rucksprung in das Hauptprogramm auf S$4, der vorher von DD3 
dargestellte Satz eliminiert wird. Der ndchste Sprung auf PP2 findet 
den Wert, der vorher in DD2 stand, in DD3 vor und DD2 enthilt die 
Adresse des niichsten Satzes: es liegt kein Ausgabesatz vor. 


\*) 


GE-120/130 —— ee 
Ref .-Nr.: 32.30.307 D 
Juni 1970 


-78- 


Oo 


Wenn Satze einer Gruppe mit gleichen Schlisseln eliminiert werden 
sollen, kann diese Technik wiederholt werden, wahrend das Eliminieren 
der letzten Gruppe schwieriger ist. Es gibt zwei Méglichkeiten: die 
Angabe erfolgt in DD2, wenn der Satz in DD3 mit gleichen Schlisseln 
eliminiert wird und wo diese Gleichheit gespeichert wird, und in DD3, 
wenn der neue Satz in DD2 verschiedene Schlussel hat, und wenn der 
Satz in DD3,Teil einer Gruppe mit gleichen Schlisseln, eliminiert 
werden sot]. Die Zusatzroutine muf das Speichern der Gleichheit 
erhalten. 


~ Inhalts- und Gréfentnderung eines Satzes und Eliminieren eines 
- anderen Satzes. 


Das kann von der Zusatzroutine durch eine Kombination der ersten oO 
zwei Moglichkeiten ausgefthrt werden. D.h., der RUcksprung auf 

594 eliminiert den von DD2 definierten Satz, wéhrend die Anderung 

durch Manipulation des Satzes in DD3 zuldssig ist. Es wird darauf 
hingewiesen, daf die Anderung sich nur auf den Satz in DD3 und die 
Eliminierung nur auf den Satz in BD2 bezieht, 


c) PP3 (Letzter Satz} 


Diese Verkettung wird durch einen Befehl JU auf die Adresse PP3 aus- 
gefuhrt, nachdem der letzte Satz in die Ausgabezone 

tbertragen worden ist und kein folgender Satz, der von DD2 definiert 
wird, vorliegt. 


Wenn keine Einfgung gefordert wird, mu® durch einen Sprung JU auf 
$85 in das Hauptprogramm zuriickgesprungen werden, wobei der letzte 
Satz gespeichert und die Ausgabedatei abgeschlossen wird. . 


In diesem Stadium kénnen Summensitze eingeflgt werden. Zu diesem 
Zweck muB in DD2 die Anfangsadresse des Satzes gespeichert werden, 
der an das Ende der Ausgabedatei angeftgt werden soll. Mit einem Befehl 
JU erfolgt der Ricksprung in das Hauptprogramm auf $$3. Damit wird 

der Satz in DD3 gespeichert (letzter normaler Satz) und die Adresse 

des Summensatzes wird nach DD3 tbertragen.An diesem Punkt springt 

das Hauptprogramm erneut nach PP3. 


Wenn keine weiteren Einfugungen gefordert werden, mu@ erneut durch 
einen Befehl JU auf SS5 in das Hauptprogramm zuriickgesprungen werden. 
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Die Summenstitze missen das gleiche Satzformat wie die Ausgabedateten 
haben, 


Die Register konnen vollsttindig belegt werden, 

d) ~ PPA (Programmende) 
Die Verkettung erfolgt durch einen Befehl JU auf die Adresse PP4 am 
Ende des Sortierprogramms, nachdem die Dateien abgeschlossen wurden, 


statt der Ubernahme der Steverung durch das Operating System. 


Im Hauptprogramm ist keine Ruicksprungadresse vorgesehen, 
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3. Objektprogramm Operation 
3.1, Normale Operation 


In diesem Abschnitt wird die normale Operation des generierten Sortier- 
programms auf Band behandelt. Sie beginnt von dem Punkt an, wo: 


- der ,SPG-Generator ein fehlerfreies Sourceprogramm auf dem Arbeits— 
band ] oder auf der Ausgabeplatte erstellt hat. 


- das Sourceprogramm unter Verwendung der Karte .APS assembliert worden 
ist und ein feblerfreies Objektprogramm auf dem Arbeitsband 2 oder der 
APS~Ausgabeplatte erstellt worden ist. 


- durch Verwendung der Karte .API ist das Objektprogramm auf ein System~ 
Ca) band oder ein Master-Tape, Systemplatte oder Master—Disc in die 
Programmbibliothek geladen worden ist. 


Dasselbe Objektprogramm kann so oft wie nétig ohne weitere Generierung 
oder Assemblierung benutzt werden, sofern die wesentlichen Aspekte des 
Sortterprogramms unvertindert bleiben, d.h., das Dateiformat und die 
Maschinenkonfiguration durfen nicht getindert werden und falls vorhanden, 
darf die maximale zulassige Datenmenge nicht Uberschritten werden. 


3.1.1. Eingabe uber den Kartenleser 


Fur den Anruf des Objektprogramms ist im ETOS die Karte .PRL und im 
EDOS die Karte .LOAD erforderlich, wenn das Objektprogramm nicht 
auf einem Master-Tape oder einer Master-Dise steht und automatisch ver- 
kettet wird. 


Dazu gehért ein Satz LBC-Karten, jeweils eine Karte fur jede Band- oder 

Oo Plattendatei, die im Ursprungsprogramm definiert worden ist. Die LBC- 
Karten miissen dieselben Dateicode erhalten wie die SPG-Befehle DVC, 
FLOP und FLD, Die "Datei" der Karten KLBC mui mit der Karte BEND 
enden, Dem Programm stehen alle Optionen fiir die Karten LBC zur Ver- 
fugung, aufer, wenn im Ursprungsprogramm ein "Overlay" erklart worden 
ist. In diesem Fall missen beide benutzten Dateien denselben Wert er- 
halten, falls ein Wert gedndert wird. 


Es wird empfohlen, grUndliche Tests durch die Karten BLBC auf die Dateien 
ausfihren zu lassen. 
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Nach der Karte BEND folgen keine weiteren Karten, die sich auf dieses 
Programm beziehen, es sei denn, da Karteneingabe oder gemischte Eingabe 
erklart worden ist, oder wenn eine undefinierte Eingabe teilweise oder ganz 
in Karten steht. Im letzten Fall legt der Benutzer das Format der Kartendatei 
fest. Bei einer Karten- oder gemischten Eingabe mu8 die Kartendatei mit 
einer weiteren Karte KEND enden. Wenn fir einen bestimmten Lauf keine 
Kartendaten fir einen der Fille vorliegen, mu die Karte KEND dennoch 
angegeben werden. Sind keine Kartendaten spezifiziert worden, wird die 
zweite Karte KEND nicht benstigt. 


3.1.2.  Erstes Laden der Dateien 

Bei Beginn des Objektprogramms werden alle erforderlichen Dateien durch 

gedruckte Meldungen angefordert. Die folgenden Hinweise kénnen zu 

Zeitgewinn fuhren, 

a) In Mischprogrammen werden alle erklarten Dateien von Anfang an 
benstigt. 

b) In Sortierprogrammen werden die primdre oder einzige Eingabedatei 
und alle Arbeitsdateien bendtigt, die keine gemeinsame Einheit mit 
der Eingabedatei belegen. Daher bendtigen fiir alle normalen Benut~ 
zungen des SPG die Sortierprogramme auf Band die Eingabedatei und 
alle Arbeitsdateien bis auf eine, wahrend Sortierprogramme auf Platte 
die Eingabedatei und eine der Arbeitsdateien brauchen. 

Wenn dasselbe Objektprogramm mehr als einmal durchlaufen wird, 
kénnen die erforderlichen Dateien aus der ersten Auflistung des 
Objektprogramms entnommen werden. Die zugeordneten Einheiten 
andern sich nur mit den Karten LBC, 
Bemerkung: 
Es erfolgt keine Anforderung auf eine Datei, die evtl. auf einem 
nicht-definierten Datentrager steht. Diese Datei mu8 von Anfang an 
zur Verfigung stehen. 

3.1.3, | Handhabung der Datei 

Das Objektprogramm druckt die Dateinamen, Spulennummern (Volume 

Numbers) und die entsprechenden Einheitennummem aller Bandspulen 

und Plattenstapel, die geladen oder entladen werden, Jedesmal, wenn 

eine dieser Meldungen oder eine Gruppe dieser Meldungen ausgedruckt 

wird, halt das Programm auf der Position 300 (hexadezimal) an. Der 

Operator liest die ausgedruckte Meldung und fuhrt vor dem erneuten 

Starten alle Anweisungen aus. Anhang F enthilt eine vollsténdige Liste 

aller Anweisungen des Objektprogramms. 
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Das Objektprogramm hilt in der Checkpoint-Routine nicht an, mit Ausnahme 
bei Mischprogrammen mit Karteneingabe, In diesem Fall mu8 der Operator 
die zuletzt gelesene Karte beriicksichtigen, da kein Ausdruck in der 
Checkpoint-Auflistung erfolgt, 


Erfolglose Programmlaufe 
Maschinenfehler 


Dos Hauptprogramm druckt die Checkpoints in Intervallen aus, wodurch es 
erméglicht wird, auf den vorhergehenden Checkpoint zurtickzuspringen, 
wenn ein Maschinenfehler oder eine andere Unterbrechung vorliegt. Er- 
folgt die Unterbrechung vor dem Ausdrucken der Checkpoints, kann das 
Programm vom Anfang an neu gestartet werden. 


Wenn der Operator eine Liste aller geladenen Datentréiger (Volumes) beim 
Schreiben jedes Checkpoint erstellt, wird die Prozedur fiir das erneute 
Starten erleichtert. Andernfalls kann die Ausgabe des Objektprogramms 
nach dem zuletzt angeforderten Datentrager (Volume) durchsucht werden. 


Kartendateien fur Mischprogramme werden auf den Wiederanloufpunkten 
ermeut geladen, wobei mit der Karte begonnen wird, die hinter der in 
Checkpoint angegebenen Karte steht, 


Wahrend der ersten Eingabephase von Sortierprogrammen auf Platte und 
Sortierprogrammen auf einer Spule, werden keine Checkpoints geschrieben. 
Daher werden keine Dateien auf einem nichtdefinierten Datentrager oder 
in Lochkarten bzw. Banddateien mit einem nichtstandardméBigen Kennsatz 
beim erneuten Starten wieder angefordert, ausgenommen davon ist der 
Programmlauf von Anfang an. 


Bemerkung: 


Bandspulen und Plattenstapel mit den Arbeitsdateien mUssen sich wegen des 
haufigen Gebrauchs in einwandfreiem Zustand befinden. 


Programmfehler 


Die Fehlerbehebung in Sortierprogrammen ist immer schwierig, da die 
Ursache des Fehlers oft Uberschrieben wird. Aus diesem Grunde missen 
sorgfltige Tests ausgefuhrt werden. 
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- Der Generator prift, ob die Logik des Hauptobjektprogramms giltig ist, 
ob die Dateiformate gultig sind und ob der zugeordnete Speicherplatz ausreicht. 


- Der Generator prift, ob einer der unerlaubten APS~Befehle in den Own- 
Coding-Routinen angegeben wurde. 


~ Der APS-Assembler prift, ob die Formate und Verkettungen des Objekt- 
programms gultig sind. 


- Das BIOS, die OPEN, CLOSE und Checkpoint-Routinen prifen, ob die 
korrekten Dateien und Datentriiger (Volumes) aufgelegt worden sind, 


- Das Objektprogramm prift, ob die Formate der Eingabedateien richtig 
sind. oO 


Damit verbleiben die folgenden wahrscheinlichen Fehlerursachen: 

- Bestimmte SPG-Makrobefehle, die nicht bestatigt werden kénnen (Position 
des Schlissels, Type, Richtungssinn und Sequenz, falsche Kernspeicher- 
gréfe fiir das Objektprogramm). 

- Benutzung eines kleineren Kernspeichers als angegeben, 


~ Logische Fehler in den Own~Coding-Routinen. 


Eine falsche Erklarung des Schliissels fuhrt zu einer falschen Sequenz in 
der Ausgabedatei. 


Ein kleinerer Kernspeicher als die erklarte Kernspeichergréfe fuhrt zu 
einer “illegalen Adresse"(normalerweise wahrend eines Ubertrags auf eine oO 


Randeinheit). 


Die Own-Coding-Routinen des Benutzers stehen in den folgenden Positionen: 


- Sektion C: Am Anfang von Segment 2 
- Sektion H: Am Ende von Segment 2 
- Sektion I: Am Anfang von Segment 7 
- Sektion O: Am Anfang von Segment 9 
- Sektion M; Am Anfang von Segment 7 
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4, Programmaufbav und Programmtechnik 
A.l. Aufbau und Technik des Generators 


Der Generator ist ein Programm vom Typ 1 und steht auf einem Systemband 
oder einer Systemplatte. Er besteht aus 98 Segmenten: die Segmente 21 

bis 98 enthalten die Daten, woraus die Objekiprogramme gebildet werden, - 
die Segmente 1 bis 20 enthalten die Routinen, die das Ursprungsprogramm 
analysieren und das entsprechende Objektprogramm erstellen, 


4.1.1. Datensegmente des Generators 


oO a) Segmentaufbau 


Die Daten fiir den Aufbau des Objektprogramms werden auf die 
Segmente 21 bis 98 aufgeteilt. Alle diese Segmente haben annthernd 
die gleiche Lange. Die Anfangs- und Endpunkte der Segmente sind 
bedeutungslos, da die Daten bearbeitet werden, als lage eine 
sequentielle Datei vor,und manchmal werden die Segmente abgesucht, 
bis eine bestimmte Information gefunden wird. 


b) Inhalt 


Der gréBte Teil der Daten besteht aus verdichteten und kodierten 
nicht-assemblierten APS-Befehlen. Diese Befehle bilden die in den 
Objektprogrammen benuizten Routinen. Der Rest der Daten trennt 
und identifiziert diese Routinen oder spezifischen Befehlsfelder inner- 
haib der Routinen, wie aus den Beschreibungen in c), d) und e) 
hervorgeht. 


oO c) Hauptelement 


Zuerst werden die Daten durch die HauptelementschlUssel in 18 Teile 
geteilt. Diese Schlussel geben normalerweise keine speziellen Routinen 

an sondern werden benutzt, um die Suchzeit fur eine Routine durch 
Aufteilen der Daten in Routinengruppen zu reduzieren. So stehen z.B, alle 
moglichen Eingabe- und Ausgaberoutinen in demselben Hauptelement. 

Die Hauptelemente werden weiter in Unterelemente und variable 

Elemente unterieilt. 
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d)  Unterelement 


Fast alle Daten werden zu Sektionen des Programmcode mit fester Linge 
reduziert. Es werden nur wenige Operanden eingeftigt, die keinen Ein- 
fluB auf den Befehlstyp oder die Lange des Elementes haben, Diese 
Sektionen des Programmcode werden Unterelemente genannt, wovor 
jeweils ein Unterelementschlussel steht. Dieser gibt durch eine Gruppe 
von "Schalterstellungen" an, wann das Unterelement in das Objekt- 
programm eingefgt werden soll, sowie die kompilierte Lange des 
Elementes. 


e) Variable Elemente 


Die wenigen Routinen, die wegen ihres variablen Aufbaus nicht als 

ein Hauptelement dargestellt werden kinnen, werden durch einen ent- 
sprechenden Schitissel angegeben. Dieser Schlussel gibt wie beiden - 
Unterelementen an, wann die Einflgung in das Objektprogramm er- 
folgt, jedoch fehIt die Angabe der kompilierten Linge. Jedes variable 
Element wird speziell wahrend der Generierung bearbeitet, um das 
Element zu erstellen und seine kompilierte Linge zu berechnen. Die 
Vergleichsroutine mit ihren drei Typen von Vergleichsbefehlen, ihren 
Schlusselpositionen und ihren Sortiermodi ist ein Beispiel eines variablen 
Elementes. 


f)  Anderung der Befehle 


Auf alle Befehle eines Unterelementes, woftr die Einfiigung von 
Parametern aus dem Ursprungsprogramm erforderlich ist, folgt ein 
Anderungsindikator. Dieser Indikator beschreibt die Position in dem 
Befehl des zu dndernden Feldes und die Kernspeicheradresse des zu 
speichernden Parameters. Diese Parameter werden vom Ursprungs~ 
programm hergeleitet und wahrend der Generierung in einer Kern- 
speichertabelle gespeichert. Z.B. werden die Dateicode aus dem 
Ursprungsprogramm entnommen und in Befehle eingefigt, die die 
Dateitabellen adressieren. 


4.1.2,  Programmsegmente des Generators 
Die Segmente 1 bis 20 prufen und analysieren das Ursprungsprogramm und 
wenn keine grundlegenden Fehler gefunden werden, wird ein Objekt~ 


programm erstellt, das unmittelbar vom Band oder von der Platte assembliert 
werden kann. 
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Der Sprung in das Programm erfolgt auf das Segment 1 durch die Karte 
.SPG und der Ursprung der restlichen Makrobefehle und Zusatzsektionen 
wird aus den Daten in der .SPG-Karte bestimmt, die aus der Kartenlese- 
zone entnommen wird. 


Dann werden die Makrobefehle aus Karten vom Band oder von der Platte 
gelesen. Wahrend des Lesens werden sie zusammen mit den feststel lbaren 
Fehler aufgelistet, bevor das vollstandige Ursprungsprogramm analysiert 
wird. 


Wenn alle Makrobefehle gelesen und tabellarisch zusammengefaBt worden 
sind, wird die Beziehung untereinander geprUft und weitere Fehler werden 
ausgedruckt. Gleichzeitig erhalten eine Reihe von Spalten die im Ursprungs= 

oO programm festgelegten Werte. Damit wird das Verarbeitungsverfahren 
definiert: Sortierprogramm auf Band oder Sortierprogramm auf Platte, oder 
Mischprogramm sowie der genave Inhalt des Objektprogramms. Die Mebrzahl 
der in die Unterelemente einzufigenden Parameter wird in den erforder- 
lichen Positionen gespeichert. 


Dann werden die Zusatzsektionen, sofern sie vorhanden sind, aus den Karten 
vom Band oder von der Platte gelesen und auf das Arbeitsband 2 bzw. auf 
den Anfang der ersten freien Zone auf der Systemplatte gem&R dem benutzten 
Operating System geschrieben. Wahrend dieser Phase prift der Generator, 
da® nur zuldssige Befehle benutzt werden und summiert die Léingen der 
APS-Befehle in jeder Sektion, Es werden auch die Namen der Standerd- 
subroutinen und die Sektionen, worin sie enthalien sind, tabellarisch zu- 
sammengefaBt. Nach Feststellung des Befehls BEND prift der Generator 

den APS~Assembler, der auf dem Systemband oder auf der Systemplatte 

steht und entnimmt daraus die Lingen der Standardsubroutinen. Damit wird 
die kompilierte Lange jeder Zusatzsektion bekannt. 


An diesem Programmpunkt wird die Generierung unterbrochen, wenn ein 
grundliegender Fehler festgestellt worden ist. Weniger wichtige Fehler 
unterbrechen nicht den Ablauf der Generierung. 


Dann wihlt der Generator aus den Schaltern die Tabellen aus, die den 
Inhalt jedes Segmentes im Objektprogramm in Form von Zusatzsektionen 
und Hauptelementen darstellen und welche der vier Zonen jedes Segment 
belegen soll. 
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Diese vier Zonen erstrecken sich auf den gesamten Speicherplatz, der fur 
das Objektprogramm reserviert worden ist, d.h. von der Startadresse bis 

zu dem Anfang der Common Storage. Die erste Zone enthalt nur Datei- 
tabellen, die zweite Zone enthilt alle besonderen Routinen wie OPEN und 
Checkpoint, die dritte Zone enthilt eine Routine, um die Eingabe der 
verschiedenen Segmente zu stevern, wihrend die vierte Zone das Sortieren 
oder Mischen ausfihrt (es gibt bis zu 4 Sortier- und Mischfunktionen), Den 
Zonen 1, 2, 3 und 4 wird der gesamte verfigbare Kernspeicherplatz von 
der niedrigsten bis zur hischsten Adresse in dieser Sequenz zugeordnet. 


Die Zonen 1, 2 und 3 enthalten keine variablen Datenzonen und ihre Lingen 

kénnen von den Befehlen und festen Datenzonen summiert werden. (Der 

Zone 2 wird eine Lange zugeordnet, die gleich der Linge der gréften be- oO 
sonderen Routine ist). 


Der Zone 4 wird automatisch der Rest des verfiigbaren Kernspeichers zuge- 
ordnet. Die Lange der Sortier- und Mischsegmente wird mit der Lange von 
Zone 4 verglichen und der Uberschu8 wird den Zonen im Arbeitspuffer zu- 
geordnet, die von diesem Segment adressiert werden, 


Zur Festlegung dieser Zonen und zur Berechnung der Lingen fir die Arbeiis- 
puffer berechnet der Generator die Linge der Segmente. Jedes Haupt- 
element, das im Segment gebraucht wird, wird gesucht und der Wert jedes 
Unterelementes oder variablen Segmentes wird mit den Schal terstellungen 
verglichen, Wenn beim Vergleich Ubereinstimmung festgestellt wird, ergibt 
sich die Lange des Elementes, entweder durch eine Extraktion bei Unter- 
elementen oder durch eine Berechnung unter Verwendung von Daten aus dem 
Ursprungsprogramm fiir variable Elemente. 


Auf diese Weise werden die Léngen aller Hauptelemente in dem Segment oO 
berechnet und ihre Summe wird auf die Lange der Zusatzsektion addiert, 
falls eine vorhanden ist. 


Jedes Segment des Objektprogramms wird auf diese Weise abgefragt. Die 
GroRe der Segmente und die Gro®e der wahlfreien Puffer wird berechnet 
und auf die Parametertabelle addiert. In diesem Stadium kann der Generator 
weitere grundlegende Fehler feststellen, wenn nicht geniigend Arbeitsplatz 
fur die Puffer zur Verfugung steht. An diesem Programmpunkt wird festge- 
stellt, ob das Ursprungsprogramm vollstiindig giltig ist und ob alle Parameter 
fur die Generierung vorliegen. 


Dann bestimmt der Generator die Bearbeitungstabelle erneut und erstellt das 
Objektprogramm Segment fiir Segment. 
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Die Hauptelemente werden in derselben Weise wie vorher gesucht, wobei 
diesmal die Unterelemente und die variablen Elemente selbst bendtigt 
werden, wahrend ihre Langen nicht von Bedeutung sind. Die Unterelemente 
werden Befehl fur Befehi entnommen und, falls erforderlich, von dem 
Parameter getndert, auf den in dem Anderungsindikator verwiesen wird. 
Variable Elemente werden von den entsprechenden Routinen gebildet. 


Die Daten von dem Generator selbst werden mit den Zusatzsektionen ge- 
mischt. Die Zusatzsektionen stehen auf dem Arbeitsband 2 oder vom Anfang 
der ersten freien Zone auf der Systemplatte an, gemi® der Inhaltsfolge, 

die fur die Segmente in der Bearbeitungstabelle definiert worden ist. 


Bei Verwendung des ETOS wird das generierte Programm auf dem Arbeits- 
band | gespeichert. 


Bei Verwendung des EDOS wird das generierte Programm auf einem der 
beiden Datentriiger gespeichert: 


a) Wenn eine Arbeitsplatte vorhanden ist: vom Beginn des vierten Zylinders 
der ersten freien Zone auf der Arbeitsplatte an. Fir die Assemblierung 
mUssen mindestens 16 Zylinder auf der Arbeitsplatte und auf der System- 
platte zur Verfiigung stehen, 


b) Wenn keine Arbeitsplatte vorhanden ist: von einer variablen Position 
in der freien Zone auf der Systemplatte an. Fur die Assemblierung 
missen mindestens 26 Zylinder in der freien Zone der Systemplatte 
zur Verfiigung stehen. 


Diese Formen sind flr die Assemblierung durch den APS-Assembler qemif dem 
entsprechenden Datentrager zulassig. 


Aufbau des Objektprogramms 


In diesem Abschnitt werden die Hauptelemente, die charakteristische Be- 
legung des Kernspeichers und der Inhalt jedes Segmentes im Objektprogramm 
beschrieben. 


Hauptroutinen 


Die Objektprogramme werden aus den Zusatzsektionen und den Haupt- 
elementen gebildet. Einige der Hauptelemente bestehen aus einer un- 
veranderlichen Routine und andere Hauptelemente aus einer Anzahl von 
Routinen, von denen eine Auswahl gemacht werden muf. 
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Es gibt die folgenden Hauptelemente: 


a) 


b) 


¢) 


d) 


e) 


f) 


9) 


h) 
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Hauptelement 01: Datenbefehle 

Dieses Element enthalt die Befehle fur die Erstellung der Dateitabellen 
und eine Routine fur die Eingabe der zentralen Steuerroutine. DarUber 
hinaus enthalt dieses Element Sprungtabellen und variable Elemente. 


Hauptelement 02: Abschluroutine 


Dieses Element schlieSt Banddateien und Spulen ab. 


- Hauptelement 03: Druckroutine 


Dieses Element enthalt und druckt die Anweisungen fur den Operator, 
Haupielement 04: Routine OPEN/NEXT 


Mit diesem Element werden Banddateien und Spulen erdéffnet. 


Hauptelement 05: Checkpoint-Routine 
Dieses Element schreibt Checkpoints auf Band oder Platte. 
Hauptelement 06: Overflow-Routine 


Dieses Element bearbeitet den Wechsel des Datentrigers (Volume) 
in Arbeitsdateien auf Band. 


Hauptelement 07; Steverroutine 


Dieses Element stevert den Phasenwechsel wihrend des Programmablaufs. 
Es enthilt auch allgemeine Routinen und Daten. 


Hauptelement 08: Input/Output 


Dieses Element fuhrt alle Ubertrige auf Randeinheiten aus, mit Aus- 
nahme von einem nichi-definierten Datentrager, und auf und von 
Zwischendateien auf Platte. 


Hauptelement 09: Mischbox 


Dieses Element bildet eine einzige Kette aus einer Gruppe, die aus 
mehreren Ursprungselementen besteht. 
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p) 
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Hauptelement 10: Mischen 


Dieses Element verbindet die anderen Elemente, die fur die Ausfthrung 
eines File Merge oder des letzten Durchlaufes eines Sortierprogramms 
auf Band erforderlich sind. 


Hauptelement 11: Vorsortieren auf Band 


Dieses Element liest die Eingabedatei, bildet Satzfolgen und verteilt 
sie auf Arbeitsbander, gemda’ den Forderungen des Polyphasen Sortierens. 


Hauptelement 12: Polyphases Sortieren 


Dieses Element fuhrt eine Reihe von Mischprogrammen auf die Satzfolgen 
aus, die auf den Arbeitsdateien stehen und von der Routine zum Vor- 
sortieren erstellt wurden. Es wird ausgegeben: eine einzige Folge auf 
allen Arbeitsbiindern bis auf 1 oder ein vollstindig sortiertes Band, je 
nachdem, ob das Sortieren fir eine Spule oder fiir mehrere Spulen aus~ 
gefuhrt wird. 


Hauptelement 13: Einsetzen der Bandspule 


Dieses Element fihrt die optimale Sequenz der Mischprogramme auf 
Zwischendateien aus, die jeweils aus einer Spule der Eingabedatei uber 
ein Sortierprogramm auf mehreren Spulen erstellt wurden. Die Misch- 
programme werden nach dem vorletzten Durchlavf unterbrochen und der 
letzte Durchlauf wird vom Hauptelement 0 ausgefuhrt. 


Hauptelement 14: Vorsortieren fur Sortierprogramme auf Platte 


Diese Routine liest die Eingabedatei, bildet Satzfolgen und verteilt 
sie mit Zwischenraumen auf eine Arbeitsdatei . 


Havptelement 15: Sortierprogramm auf Platte 


Diese Routine fuhrt eine Reihe von Mischprogrammen zwischen zwei 
Plattendateien gemu8 Hauptelement 14 aus. Die Operation endet nach 
dem vorletzten Lauf. 


Hauptelement 16: Sortierprogramm auf Platte (letzter Lauf} 


Diese Routine mischt die Ausgabe des Hauptelementes 15. Dazu gehirt 
ein “Kopierlauf", der nach dem Mischen benutzt wird, wenn das 
Ergebnis auf der falschen Datei steht. 
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Hauptelement 17; OPEN/NEXT/CLOSE von Platten 


Diese Routineisffnet und schlieft alle Platrenstapel (Volumes) von 
Plattendateien ab. 


Hauptelement 18: Zuordnung aus dem Ursprungsprogramm 


Dieses Element enthalt Unterelemente fur die Zuordnung von Daten aus 
dem Ursprungsprogramm wihrend des Ablaufes des Objektprogramms. 


4.2.2,  Kernspeicherbelegung 


Fir alle Objektprogramme wird der verfighare Kernspeicherplaiz in vier 
Teile unterteilt. Die Verwendung dieser Tefle wird nachstehend beschrie- 
ben. Sie werden mit 1, 2, 3 und 4 bezeichnet; die Folge entspricht den 
aufsteigenden Kernspeicheradressen. 


a) 


b) 


c) 
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Teil 1: Dateitabellen 


Dieser Teil besteht aus den Dateitabellen fir alle Band- und Platten= 
dateien, die vom Benutzer im Ursprungsprogramm beschrieben werden 
{mit Ausnahme einer Arbeitsdatei, die auf dem Systemband definiest 
wird), Zwischendateien auf Band, deren Namen vom Objektprogramm 
zugeordnet werden, benutzen dieselben Dateitabellen (mit kleinen 
Anderungen), wie sie fiir die Dateien vorgesehen waren, die urspriing- 
lich dieselben Einheiten belegt hatten. 


Teil 2: Zusatzzone 


Dieser Teil wird von Routinen belegt, die gelegentlich erforderlich 
sind: d.h, die Hauptelemente 02, 03, 04, 05, 06 und 17, Es kann 
jeweils immer nur eine benutzt werden. Die Lange dieses Teils ist 
gleich der {angsten Routine (Druckroutine). 


Teil 3: Steverroutine 


Dieser Tetl wird immer von der Routine belegt,.die die Phasen des 
Objektprogramms stevert. Die Form und die Lange der Routine hiingen 
von der Art des Objektprogramms ab. Die Linge dieser Zone ist nicht 
einmal fur ein spezielles Objektprogramm konstant, Wenn eine Phase 
zu Ende ist und die Steverung dieser Phase nicht mehr benstigt wird, 
beginnt Teil 4 auf niedrigeren Adressen, 
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d) Teil 4: Sortier- und Mischroutinen 


Diesem Teil wird der Rest des Kernspeichers zugeordnet, der nach 
Belegung durch die Teile 1, 2 und 3 ubrig bleibt. Dieser Teil wird 

von den Sortier- und Mischroutinen benutzt, und der restliche Speicher- 
platz innerhalb dieses Teils wird den Pufferzonen dieser Routine zu- 
geordnet, Es liegt jeweils immer nur eine Routine mit ihren Puffern vor. 
Die Puffer kénnen den gesamten verfiigbaren Speicherplatz belegen,. 
wenn damit die Leistung der Sortier- oder Mischphase erhsht werden 
kann. Mit dem Ablauf des Programms in den verschiedenen Phasen 
nehmen die Adressen in diesem Teil ab, so da die hohen Positionen der 
Steverroutine wieder verfiigbar werden. 


4.2.3. Segmentierung des Objekiprogramms 


Jedes Objektprogramm hat einen charakteristischen Inhalt fir jedes Segment, 
und jedes Segment benuizt einen charakteristischen Kernspeicherteil, Aus 
den drei folgenden Tabellen geht der Aufbau der Sortierprogramme auf Band, 
der Sortierprogramme auf Platte und der Mischprogramme hervor, 


a)  Sortierprogramme auf Band 


Segment— Kernspeicher- Inhalt 
Nummer teil 
1 1 ol 
2 3 Cc 07 H 
oO 3 2 02 - 
4 2 03 
5 2 04 
é 2 05 
7 4 t 08ae 11 
8 4 O8be 09 12 
9 4 oO 08&bd 09 10 
ie) 4 O8be 09 13 
2 06 
2 17 
Oo GE-120/130 _———— SSS a eee a a 
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Anmerkungen fr die unter a), b) und c) genannten Tabellen: 


1. 
2. 


3. 


6. 


Die Kernspeicherteile werden in Kapitel 2 beschrieben. 


Hauptelemente werden mit Zahlen, Zusatzsektionen mit Buchstaben 
bezeichnet. Der Inhalt jedes Elementes wird von links nach rechts 
angeordnet, im Kernspeicher erfolgt die Anordnung von den niedrigen 
zu den hohen Adressen, 


Dieses Segment wird nicht benutzt, wenn keine Banddateien im Objekt- 
programm enthalten sind, 


Dieses Segment wird nicht benutzt, wenn keine Checkpoints verlangt 
werden. 


Dieses Segment wird nicht benutzt, wenn keine Plattendateien im 
Objektprogramm enthalten sind, 


Dieses Segment wird nicht benutzt, wenn das Sortierprogramm als Mehr= 
fachdatei nicht benutzt wird. 


a, b, ¢ und d geben an, daB die Eingabe/Ausgabe (Hauptelement 08) aus 
der Anfangseingabe (a), Zwischeneingabe (b), Zwischenausgabe (c) und 
endgiiltigen Ausgabe (d) besteht. 


Bemerkung: 


Elemente aus dem Hauptelement 18 werden immer an den Anfang der 
Segmente plaziert, die den Kernspeichertei! 4 belegen, 
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b)  Sortierprogramm auf Platte 


Segment- Kernspeicher- Inhalt 
Nummer teil 


leeres Segment 
feeres Segment 
17 


1 

3 
2 
2 
2 
2 
4 
4 
4 
4 
2 
2 
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¢) Mischprogramme 


Segment- Kernspeicher- 
Nummer teil 


[ay 


1 
2 
3 
4 
3 
é 


i 


O8ad 09 
leeres Segment 


leeres Segment 


op ON 


leeres Segment 


leeres Segment 


V7 


vnyPek ee PF RMD NY NYDN Ww = 


ix) 
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4.3. Sortieren auf Band 
4.3.1. | Phasen beim Sortieren auf Band 


Beim Sortieren auf einer einzigen Spule gibt es drei Sortierfunktionen oder 
Sortierphasen. Die erste Phase ist das Vorsortieren. Diese Phase liest die 
Eingabedatei in so groBen Teilen, wie im verfiigbaren Kernspeicher aufge- 
nommen werden kiénnen, sortiert die Teile zu Folgen und verteilt diese Folgen 
auf die Arbeitsdateien. Das teilweise Sortieren reduziert die Anzahl der 
Durchlaufe in der nadchsten Phase. Wenn das Ende der Eingabedatei festge- 
stellt wird, beginnt das Polyphase Sortieren. Jetzt werden eine Reihe von 
Mischprogrammen ausgefiihrt, bis eine einzige Folge auf allen Arbeitsbiindern 
bis auf 1 tbrig bleibt. Dann folgt die endgiltige Ausgabephase, der letzte 
Oo Lauf. Die Datenfolgen werden gemischt und eine einfache Ausgabedatei 
wird im geforderten Format erstellt. 


Dagegen ist das Sortieren einer Mehrfachdatei schwieriger. Jede Spule der 
Eingabedatei wird einzeln von den Vorsortier- und Polyphasen Sortierpro- 
grammen bearbeitet. In diesem Falle erfolgt das Polyphase Sortieren, bis 

eine vollsttindig sortierte Zwischendatei erstellt worden ist. Die Eingabe- 
datei erstellt demnach eine Anzah! von sortierten Dateien in einem Zwischen- 
format, das die Eingabe fur die niichste Phase, den Vergleich, bildet. Es 
werden eine Reihe von Mischprogrammen auf die Zwischendateien ausgefuhrt, 
woraus weniger und gréRere Zwischendateien hervorgehen, bis ein einziges 
Mischprogramm fur alle Daten ausreicht. An diesem Punkt setzt die end- 
gultige Ausgabephase, der letzte Lauf,ein und der letzte Lauf wird erstellt. 


Die Steverroutine uberwacht die Operation des Sortierens bei der Einspulen- 
datei und der Mehrfachdatei, Dasselbe gilt flr die Benutzung von gelegent- 
— lich gebrauchten Routinen. Diese werden normalerweise beim Wechsel der 

Phasen eingefiigt, oder wenn die Eingabe-/Ausgaberoutinen eine besondere 
Bedingung feststellen, die der Steverroutine mitgeteilt wird. 


Die folgenden Kapitel beschreiben die Techniken beim Vorsortieren, 
Polyphasen Sortieren, Spulenvergleich und letztem Lauf. 


.*) 
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4.3.2.  Vorsortieren 
Das Vorsortieren wird von Segment 7 ausgefUhrt. 


Die zu sortierenden Daten werden in Sektionen eingelesen, deren Gréfe von 
dem freien Kernspeicherplatz abhingt. Die Sdtze werdenvon einem Ende dieser 
freien Zone an gespeichert, und ihre Adressen vor anderen Ende an, bis 

keine weiteren Sétze mehr untergebracht werden kénnen. Die Satzadressen 
werden in derselben Zone gemé@ ihren Schlisseln sortiert. Die so gebildeten 
Datenfolgen werden auf die Arbeitsbinder vertetit. 


Bei der Eingabe und Ausgabe in dieser Phase wird Doppelpufferung benutzt 

(wenn die Eingabe nicht von einem nicht-definierten Datentrager erfolgt). 

Die Blockgrée wird vom Benutzer definiert und die BlockgréBe der Zwischen- oO 
ausgabe wird wihrend der Generierung berechnet. Diese Blockgréfe wird 

auch beim Polyphasen Sortieren, beim Spulenvergleich und bei der Eingabe 

fur den letzten Lauf benutzt. 


Die Verteilung der Datenfolgen auf die Arbeitsdateien hingt von den Er- 
fordernissen des Polyphasen Sortierens ab. 


Bei der Verteilung wird immer gefordert, da auf eine Arbeitsdatei keine 
Daten geschrieben werden. Wenn eine Arbeitsdatei derselben Bandeinheit 
wie die Eingabedotei zugeordnet ist, wird sie daftir benutzt. Andernfalls 
kann die leere Arbeitsdatei eine beliebige der vorhandenen Arbeitsdateien 
sein. 


Ein einzelner Checkpoint wird erforderlichenfalls am Anfang jeder Anwen- 
dung der Vorsortierroutine geschrieben. 


4.3.3. Polyphases Sortieren Oo 


Diese Sortierfunktion wird vom Segment 8 ausgefthrt. 


Das Sortierprogramm bearbeitet die Daten, wie sie von der Vorsorflerroutine 
verteilt worden sind. 


Bei der Einspulenversion des Sortierprogramms oder wenn die Mehrfachdatei- 
version auf eine Datei mit nur einer Spule angewendet wird, wird das 
Polyphase Sortieren nach dem vorletzten Lauf unterbrochen. An diesem 
Programmpunkt enthalten alle Arbettsdateien mit Ausnahme einer Arbeits- 
datei eine Folge von Daten. Jetzt wird die Routine "letzter Lauf" von der 
Steverroutine direkt eingegeben. An diesem Punkt beim Verlassen des 
Polyphasen Sortierens sind die einzelnen Datenfolgen bei Vorwértslesen, 
aufsteigend geschrieben worden und bei RUckwiirtslesen absteigend ge~ 
schrieben worden, 
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Bei der Anwendung des Sortierprogramms auf eine Mehrfachdatei wird die 
Bearbeitung nach dem vorletzten Lauf fortgesetzt, um eine Datei zu er- 
stellen, die vorwarts geschrieben ist. Jede so erstellte Datei ist eine sor- 
tierte Version einer Eingabespule und wird fir die Eingabe in die Vergleichs- 
routine entladen. Die Dateien werden immer mit AO, Al, A2 usw. bezeichnet 
und durch eine gedruckte Anweisung identifiziert, 


Wenn fur die Ausgabedate? eine bestimmte Bandeinheit zugeordnet worden 
ist und wenn diese Einheit auch eine Arbeitsdatei enthalt, so ist die letztere, 
wenn das Programm nach dem vorletzten Lauf anhalt, leer, so da die Aus- 
gabedatei dahin ubertragen werden kann. 


Wuhrend des Polyphasen Sortierens werden bei jedem Wechsel der Ausgabe 

oO Checkpoints geschrieben. Beim Vorwartslesen werden sie an den Anfang des 
neuen Aus gabebandes und beim Rickwartslesen an das Ende des alten Bandes 
geschrieben. 


Wahrend der Phase wird Doppelpufferung angewendet. 
4.3.4, ~ Vergleich 


Die Vergleichsfunktion wird durch eine einzige Anwendung von Segment 10 
ausgefihrt. 


Auf die Zwischendateien wird eine Reihe von Mischprogrammen ausgefihrt . 
Jede Zwischendatei ergibt sich aus der Anwendung des Vorsortierens und des 
Polyphasen Sortierens. Die Logik des Vergleichsprogramms ist in einer 
Gruppe von Tabelien enthalten. Fur jede Kombination aus Arbeitseinheiten 
und Spulen in der Eingabedatei gibt es eine Tabelle. Der zweite dieser 
Werte wird von der Steuerroutine zur Verfiigung gestellt, und das Vergleichs- 

oO programm fuhrt die Auswahl und die Speicherung der entsprechenden Tabelle 
aus, Danach kénnen die Tabellen mit Daten uberschrieben werden. 


Die Mischprogramme werden in der Tabelle durch Code angegeben, wobei 
Namen fiir die Eingabe- und Namen fiir die Ausgabedatei festgelegt werden, 
wihrend die Folge der Code die Nummer der zu benutzenden Einheit biefert. 


Die Namen der Dateien sind dieselben, die auf dem Drucker in den Anwei- 
sungen ausgegeben werden, wihrend die Einheitennummern der Reihenfolge 
der Dateitabelle entsprechen. Das Vergleichsprogramm wechselt die Datei- 
tabellen bei Beginn jedes Mischprogramms, um auf die entsprechenden 
Dateien zu verweisen). 


Oo 
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Die Mischprogramme enden an dem Punkt, wo ein einziges weiteres Misch- 
Programm eine vollstindig sortierte Datei tiefern wurde. An diesem Punkt 
erfolgt der Sprung in die Steverroutine, die den Ablauf des Programms 
"letzter Lavi" veranla&t, Gm das Sortierprogramm zu vervollstandigen. 


Es folgt ein Beispiel einer Tabelle und ihre Interpretation. Es liegt eine 
Eingabedatei aus 8 Spulen vor; es werden 4 Arbeitseinheiten benutzt: 


AQATA7BOSA3A4A5B1§ A6A 282828 BOBI B2R * 


Das Symbol $ unterteilt die Mischprogramme. Die Code Al, B2 usw. 

verweisen auf Zwischendateien. Der Code, der vor dem $ -Zeichen steht, 

ist der Name der Ausgabedatei, und wenn die letzten zwei Code in einem 
Mischprogramm identisch sind, mussen Wechselstationen bei der Ausgabe oO 
benutzi werden. Alle anderen Code in den Mischprogrammen stellen Ein- 
gabedateien dar. Der Code R stellt die Ausgabedatei und* stellt das Ende 

des letzten Laufs dar. Die tbrigen Code in diesem letzten Mischprogramm 

stellen die Eingabedatei ftir den letzten Lauf dar, der angefordert und er- 

offnet wird, bevor der Sprung in das Programm "letzter Lauf" erfolgt, Damit 

stimmt diese Eingabe mit der Eingabe aus dem Polyphasen Sortieren Uberein. 


Die Tabelle veranlaft den Ablauf folgender Mischprogramme: 


AO, Al und A7 werden zu BO gemischt. 
A3, A4 und A5 werden zu Bl gemischt, 
A6 und A2 werden unter Verwendung von Wechselstationen zu B2 gemischt. 


Danach werden BO, Bt und B2 geladen und erdffnet. Vom Vergleichsprogramm 
werden keine weiteren Mischprogramme ausgefuhrt. 


Die Tabellen ergeben sich aus dem Vergleich der berechneten Zeiten fur die oO 
verschiedenen Mischprogramme, wobei die Wechselstation beriicksichtigt 
wird, 


Nach der Eroffnung der Datentrager fur die Ausgabe werden erforderlichen- 
falls Checkpoints geschrieben, 


Wahrend dieser Phase wird mit Doppelpufferung gearbeitet. 


Das Vergleichsprogramm kann alle Kombinationen von 3 bis 10 Bandeinheiten 
und von 2 bis 10 Eingabespulen bearbeiten. Diese Kombinationen werden in 
8x 9= 72 Tabetlen dargestel lt. 


oO 
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Letzter Lauf 
Durch die einmalige Anwendung des Segments 9 wird der letzte Lauf ausgefuhrt. 


Beim Sprung in diese Routine ist der erste Datentréger (Volume) der Band- 
oder Plattenaysgabedatei von der Steverroutine erséffnet worden und eine Reihe 
von Eingabedateien auf Band, jeweils mit einer Datenfolge, sind so einge- 
stellt worden, daft der erste Block gelesen werden kann. 


Bei einem Sortierprogramm fir eine Spule oder fiir mehrere Spulen, das auf 
einer einzigen Spule ausgefthrt wird, erfolgt die Eingabe direkt durch das 
Polyphase Sortieren, Bei einem Sortierprogramm flr mehrere Spulen auf einer 
Mehrfachdatei erfolgt die Eingabe durch das Vergleichsprogramm. 


Diese Methode ist ein einfaches Mischen wie bei den Dateimischprogrammen. 
Es gibt nur eine Komplikation beim Lesen riickwérts eines Mehrspulen-Sortier- 
programms, wo der letzte Lauf nach dem Polyphasen Sortieren oder nach dem 
Spulenvergieich erfolgen kann. Der Spulenvergleich Uberlaft die Eingabe- 
dateien demletzten Lauf zum Vorwartslesen. Das Polyphase Sortieren dagegen 
uberlaQt die Dateien zum Ruckwértslesen, sofern letzteres erlaubt ist. Der 
Jetzte Lauf wahlt fiir das Lesen riickwirts in einem Sortierprogramm auf 
mehreren Spulen zwischen zwei Eingaberoutinen: eine zum Lesen rickwarts 
bei einer Einspulendatei und eine zum Lesen vorwirts. 


In allen Fallen ergibt sich aus der Einfachheit der Mischtechnik zusitzlicher 
Speicherplatz in der letzten Phase fur eine Erweiterung der Blockgrée und 


fir Formatanderungen in der Ausgabedatei . 


Falls erforderlich, werden Checkpoints am Anfang jedes Datentrigers fiir 
die Ausgabe geschrieben,. 


Fur alle Dateien wird Doppelpufferung benutzt. 
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4.4, Sortieren auf Platte 
4.4.1.  Sortierphasen 


Das Sortierprogramm auf Platte ubt drei Sortierfunktionen auf Phasen aus, 
die den Phasen des Sortierprogramms auf einer Spule dhnlich sind. Die 
Vorsortierphase liest die Eingabedatei in so groBen Teilen, wie sie der 
Kernspeicher aufnehmen kann, sortiert diese Teile intern in Datenfolgen 

und verteilt die Datenfolgen auf eine der Arbeitsdateien. Damit wird die 
Anzahl der Léufe in der nachsten Phase reduziert. Bei Ende der Eingabedatei 
wird die Phase Sortierprogramm auf Platten wirksam. Diese Phase fuhrt eine 
Reihe von Mischprogrammen aus, wobei alle Daten rickwérts und vorwirts 
von einer Arbeitsdatei auf die andere Ubertragen werden, bis ein einziger 
weiterer Lauf dieser Art zu einer vollsténdig sortierten Datei fuhren wurde. 
Dann wird die Phase "letzter Lauf" wirksam. Diese Phase ist eine vereinfachte 
Version der vorhergehenden Routine, die das Mischen ausfihrt und die 
sortierte Datei in dem endgiltigen Format schreibt. 


4.4.2. Benutzung der Arbeitsdateien in einem Sortierprogramm auf Platte 


Es wird angenommen, da®B jede Datei aus einer Anzahl von Unterdateien s 
besteht. Diese Unterdateien werden wie folgt eingefUgt: 

Die Unterdatei 1 besteht aus Pages 1, s+], 2st] usw. der Arbeitsdatei; 
die Unterdatei 2 besteht aus den Pages 2, s+2, 2st+2 usw.; 

die Unteratei 3 besteht aus den Pages 3, st+3, 2s+3 usw.; 

diese Einteilung wird fortgesetzt, bis zur Unterdatei s, die aus den Pages 
3s, 2s, 3s usw. besteht. Dadurch werden die Pages jeder Unterdatei durch 
jeweils eine Page jeder anderen Unterdatei getrennt. 


Der Wert s und die Pageltinge p werden vom Generator zugeordnet. 


4.4.3. Vorsortieren 


Das Vorsortieren wird durch eine einmalige Anwendung des Segments 7 
ausgefuhrt . 


Diese Methode ist mit der fur Sortierprogramme auf Band identisch (siehe 
4.3.2.), lediglich die Verteilung der sortierten Datenfolgen ist anders. 


Jede Datenfolge wird auf die folgenden Pages einer Unterdatei geschrieben. 
Die erste Folge wird auf die Unterdatei 1 geschrieben, die néichste auf 

die Unterdatei 2 usw., wobei nach jeweils s-Folgen auf die Unterdatei 1 
erneut geschrieben wird. 
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Wenn das Ende der Eingabedatei erreicht und die letzte Datenfolge verteilt 
worden ist, enthalt die benutzte Arbeitsdatei s eingefligte Unterdateien, 
die jeweils aus einer Anzah] von Datenfolgen bestehen. Die Verteilung 
wird auf den ersten Lauf des Sortierprogramms auf Platte Ubertragen. 


Falls erforderlich, wird ein Checkpoint zu Beginn des Vorsortierens geschrieben. 
4.4.4, Sortieren 


Das Sortieren wird durch eine einzige Anwendung des Segments 8 ausgefthrt. 
Das Sortieren wird durch eine Reihen von Mischprogrammen wie folgt aus- 
gefuhrt: 


K-Datenfolgen seien auf s-Unterdateien erstellt worden, K sei das genave 
Vielfache von s*. Die zweite Arbeitsdate? wird in s-Unterdateien wie die 
erste Arbeitsdatei unterteilt. Die ersten Folgen von jeder der s-Eingabeunter- 
dateien werden gemischt als eine Datenfolge auf die Unterdatei 1 geschrieben; 
die nuichsten Felgen werden dann gemischt, um eine zweite Datenfolge zu 
erstellen, die auf die Unterdatet 1 geschrieben wird. 


Dieses Verfahren wird so lange wiederholt, bis K/s°-Datenfolgen auf die 
Unterdatei 1 geschrieben worden sind.Das bedeutet, daB die ersten K/s- 
Datenfolgen von jeder Eingabe-Unterdatei gelesen worden sind, und jede 
Datenfolge, die auf die Unterdatei 1 geschrieben worden ist, ist s mal der 
Lange der Eingabefolgen. Weitere K/s*-Datenfolgen werden von jeder Ein- 
gabedatei gemischt und diesmal auf Unterdatei 2 geschrieben. Dieses Ver- 
fahren wird wiederholt, wobei alle Unterdateien 3, 4 ... s beschrieben 
werden. Am Ende dieses Mischprogramms liegen s-Unterdateien vor, wovon 
jede K/s?-Datenfolgen enthiilt, jeweils mit der Lange s mal der Léinge der 
Eingabefolgen. Dieses Mischverfahren wird mitderselben Logik zwischen den 
2 Arbeitsdateien wiederholt, bis ein einziger weiterer Lauf genlgen wurde, 
die Datei endgtltig zu sortieren. 


Jeder Eingabe-Unterdatei werden im Kernspeicher 2 Pufferzonen der erforder— 
lichen Page-Lange zugeordnet. Die Ausgabe, die immer nur auf eine Unter- 
datei erfolgt, enthalt zwei doppelte Pufferzonen. Die Ausgabepages werden 
paarweise geschrieben, obgleich sie spiiter einzeln gelesen werden. Dazu 
sind zwei Pufferpaareyon doppelter NormalgréBe erforderlich, was zu einer 
komplizierten Verteilung fuhrt. 
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Die aus den Unterdateien "parallel" gelesenen Datenfolgen werden 

"in Reihe" geschrieben, wodurch die Konzentration von Daten mit dem=- 
selben Schlusselbereich aufgebrochen werden. Falls der Bereich und der 
Gradiend der Schlissel in den Satzen dieselben sind, liest das Misch- 
programm immer aus denselben Pages jeder Unterdatei, die immer auf 
demselben Zylinder stehen soll. Daraus geht hervor, daft die Einstell- 
bewegung der Lese-/Schreibkipfe wahrend der Eingabe stark reduziert 
wird, obgleich eine unwesentliche Erhthung der Einstellung wahrend des 
Schreibens erfolgt. 


Wenn die Anzahl der Datenfolgen K keine genaue Potenz von s ist, werden 
Datenfolgen von ungleicher Lénge gemischt. Z.B. die letzte Folge, die 
wihrend des ersten Laufs erstellt wird, besteht wahrscheinlich aus weniger 
als s der ursprUnglichen Folgen. Dieser Fall kann nur bei der letzten Folge oO 
eintreten und sie muB in den Folgen mit normaler Linge eingefUgt werden. 
Wenn die Anzahl der Folgen, die zu Beginn erstellt werden, nicht eine 
Potenz von s ist, wird die obengenannte Verteilung nicht wirksam, da am 
Ende der letzten Unterdatei eine Licke entstehen wurde. Zur Uberwindung 
dieser Schwierigkeit wird das folgende Verfahren angewendet. Die Anzahl 
der Folgen, die auf jede Unterdatei wihrend eines Mischprogramms ge~ 
schrieben werden, ist K/s*: daraus ergibt sich ein Rest von r-Datenfolgen, 
wenn K durch s geteilt wird. Der letzte Teil der Arbeitsdatei wird jetzt in 
r-Unterdateien geteilt, anstatt in s-Unterdateien. Die Unterdatei mit der 
Nummer r enthalt Pages, die gema der Lange der kurzen Datenfolge ver- 
teilt werden und wird als Bruch der Léinge der normalen Folgen angegeben. 
D.h., wenn die kurze Folge die Linge 1 hat und die anderen Folgen die 
Lénge 4 haben, enthalt die Unterdatei mit der Nummer r nur jede 4. Page. 


Der erste Lauf mu eine andere Eingabemethode benutzen, da die doppelten 

Pages noch nicht geschrieben sind und die Endbedingungen sind nicht 

dieselben, wie ste von den folgenden Laufen hinterlassen werden, da die Oo 
Datenmenge unbekannt ist. Aus diesem Grund weicht die Arbeitsweise der 
Eingabedateien wihrend des ersten Laufs ab, 


Falls erforderlich, werden Checkpoints wihrend des Sortierprogramms auf Platte zu 
Beginn jedes Durchlaufs geschrieben. 


.e) 
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Letzter Lauf 


Der "letzte Lauf" wird durch eine einzige Anwendung des Segments 9 
ausgefUhrt. 


Das Sortierprogramm auf Plaite hinterlaft die eingefiigten Datenfolgen 
auf einer der Arbeitsdateien, Die Anzahl dieser Arbeitsdateien ist immer 
kleiner oder gleich s der Anzahl der Unterdateien, die fur das Sortier- 
programm bereitgestellt wurden. 


Dadurch wird mit einem einfachen Mischprogramm das Sortieren beendet und 
die Ausgobedatei wird direkt in ihrer endgtiltigen Form auf die zugeordnete 
Einheit geschrieben, vorausgesetzt, dali diese Einheit nicht eine Platten- 
einheit mit derselben Nummer wie die Einheit ist, die die Eingabe fur den 


‘letzten Lauf enthali. Im letzteren Falle wird die Ausgabedatei auf die 


Wechselstation geschrieben und ein einfacher Kopierlauf wird ausgefuhrt. 


Die Einfachheit der Mischtechnik, obgleich mehr Eingaberoutinen erforder- 
lich sind als die letzten Pages eines Sortierprogramms auf Band, gestattet 
die Anwendung einer kurzen Routine, wodurch zusiétzlicher Speicherplatz 
fr eine Erweiterung der Blockgrofe oder fur Formatwechsel frei wird. 


Falls erforderlich, werden Checkpoints am Anfang jedes Datentragers 
(Volume) fur die Ausgabe geschrieben. 


Fur alle Dateien wird Doppelpufferung verwendet. 


Mischen 


Das Mischprogramm besteht aus zwei Hauptphasen. Die erste Phase ist die 
Initialisterung, wenn alle benutzten Dateien unter der Steverroutine er=- 
Sffnet worden sind. Danach wird Segment 7 eingefihrt, das das Mischen 
der Dateien ausfuhrt. Das Mischen wird fortgesetzt, bis alle Daten in den 
Eingabedateien verarbeitet worden sind. 


Die Druckautbereitung, die auf die verschiedenen Eingabedateien ange- 
wendet werden kann, steht in einer Tabelle, worin die Dateinummer und die 
Code fir die anzuwendenden Verfahren enthalten sind. Fur jeden Satz 


wird diese Tabelle abgefragt, und die entsprechenden Routinen werden 
eingegeben. 


Falls erforderlich, werden Checkpoints am Anfang jedes Datentriigers 
(Volume) fur die Ausgabe geschrieben, 


Alle Eingabedateien und Ausgabedateien verwenden doppelte Puffer, deren 
GréBe vom Benutzer festgelegt wird. 
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5. Zeitdiagramme (Sortierzeiten) 
5.1. Anwendung der Zeitdiagramme 


5.1.1. Allgemeines 


Die Diagramme enthalten nur die empfohlenen standardma8igen Verwen- 
dungen des SPG. 


Die Diagramme basieren auf den Berechnungen fur Datendateten mit Random= 
Zugriff und Standardformat. 


Aus den Diagrammen kann der Benutzer die angentherte Zeit entnehmen, 

oO die fUr das Sortieren einer bestimmten Datenmenge erforderlich ist. Fur 
Dateien mit unterschiedlichen Satzlangen und Blockgré8en kénnen betracht- 
liche Zeitunterschiede erwartet werden, obgleich es sich um die gleiche 
Anzahl von Zeichen handeln kann. 


Fur eine gegebene Datenmenge erhtht sich der Zeitbedarf fur das Sortier- 
programm, wenn die SatzgréBe klein ist (d.h. wenn die Anzahl der Sutze 
zunimmt). In Extremfallen kénnen Zeitunterschiede bis zu 100 % vorliegen. 


5.1.2.  Auswertung der Diagramme 


Genaue Eingabe- und Ausgabezeiten kénnen nicht festgelegt werden, da sie 
von dem Aufbau der Datei, der Satzgréfe, Blockgréfe usw., abhingen, 


Bei einer Mehrfachdatei mu8 die Sortierzeit fur jede einzelne Spule berechnet 
werden. Diese Zeiten mUssen zusammen mit der geschatzten Zeit fur den 
Spulenvergieich addiert werden, 


Die Leistung der Sortierprogramme auf Band wird nicht wesentlich erhsht, 
wenn mehr als 5 Arbeitseinheiten benutzt werden, es sei denn, die Satz- 
lange ist gro8 und eine Maschine mit 32K steht zur Verfligung. Es wird vor— 
geschlagen, eine Reihe von Testldufen auszufthren, damit die beste Konfi- 
guration unter den gegebenen Bedingungen gefunden werden kann. 


5.1.3.  Etngabe+ und Ausgabeubertrige 


Die berechneten Zeiten in den Diagrammen gehen davon aus, da keine 
Kartendateien benutzt worden sind. Daher muf die fur das Lesen einer Karte 
bendtigte Zeit addiert werden. Die Kartenlesezeit kann als konstant und 
abhiingig vom benutzten Kartenleser angesehen werden, 


eo) GE-120/130 —— 7 


Ref.-Nr.: 32.30.307 D 
Juni 1970 


- 108 - 


Die erforderliche Zeit fiir das Mischen kann als Summe der Zeiten zum 
Lesen aller Eingabedateien und zum Schreiben der Ausgabedatei ange- 
sehen werden. 


Die Zeit zum Lesen einer Kartendatei aus N-Karten auf einem Karten=- 
leser mit der Geschwindigkeit von S-Karten pro Minute ist gleich (N/S)— 
Minuten. 


Die Zeit zum Lesen/Schreiben einer Banddatei mit der Lange L (in Zeichen) 
und der Blockgré8e B auf einer Bandeinheit mit einer Ubertragsgeschwindig- 
keit T und der Zeit fur den Zwischenraum G ist gleich L (B/T + G)/B 
Millisekunden. 


Die Zeit fur das Lesen/Schreiben einer Plattendatei, die aus P—Pages und oO 
der Linge S$ (Sektoren) besteht und C (Zylinder) belegt, ist gleich 
(30+ 12,5 P +2,5 PS) Millisekunden. 


Tabelle 1 enthult die Magnetba nd-Eigenschaften fur Standard-Magnet- 
bandeinheiten der Serie GE-130/120. 


Es ergeben sich zwei Zeiten fur Zwischenrtiume: 


a) Startverzigerung bei nicht-kontinuierlichen Operationen 
b) Zwischenzeit bei kontinuierlichen Operationen, 


Alle Einheiten kénnen rickwirts Lesen. Das Riickspulen erfolgt mit einer 
Geschwindigkeit von 300 Zoll pro Minute. 
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Tabelle 1: Magnetbandeigenschaften 
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5.2. Vorsortieren auf Band und Polyphases Sortieren 


Die Zeiten in den Tabellen sind fUr Sortierprogramme auf nus einer Spule 
mit einer Blockgréfe von 1000 Zeichen fur die Eingabe und Ausgabe und 
einer festen Satzlange von 100 Zeichen berechnet worden. 


In den vier Diagrammen sind Zeitkurven fur die folgenden Maschinen- 
konfigurationen angegeben: 


GE-320, Kernspeicher 12 K, 
GE-120, Kernspeicher 16 K, 
GE-120, Kernspeicher 24 K, 3 und 5 Arbeitshtinder 
GE-120, Kernspeicher 32 K, 3 und 5 Arbeitsbiinder 
GE-130, Kernspeicher 16 K, 3 und 5 Arbeitsbinder 
GE-130, Kernspeicher 24 K, 3 und 5 Arbeitsbander 
GE-130, Kernspeicher 32 K, 3 und 5 Arbeitsbiinder 


3 und 5 Arbeitsbinder 


Alle Bander benutzen die Méglichkeit des Rickwiurtslesens. 


Beide MaBstabe in den Diagrammen sind logarithmisch. 
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Zeit Ubetragsrate (ke/s 
(in Minuten) Anzahl der Arbeits- 
binder 


=| 


300) —~ 


GE-126, Kernspeicher 12 K | ae 
Satzlange 100 Zeichen } 


200 


159) =I 
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Anzahl der Sétze x 1.000 
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Zeit 


Ubertragsrate (k 
(in Minuten) 9 (ke/s) 


Anzahl der Arbeits- 
bander 


400 
309) 
GE-120, Kernspeicher 16 
Satzlange 100 Zeichen 
200 _f 


150 L 
| : A_f, 


il 


2 e 
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Anzahl der Sdtze x 1000 
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Zeit Ubertragsrate (ke/s) 
(in Minuten) nzahl der Arbeits- 


binder 
400. 
cae ie 
309) | | 


L GE-120, Kernspeicher 24 K 


Satzldnge 100 Zeichen 


if 2 3 5 10 20 30 4) ~«50 60 (OO (10 


Anzahl der Sitze x 1000 
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Zeit 3 Ubertragsrate (ke/s) 
(in Minuten) Anzahl der Arbeits- 
binder 


300 - i 


GE-120 Kernspeicher 32 K 


1 2 3 5 to: 20 30-40 «50 60 «8 (100 


Anzahl der Satzliénge x 1000 
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Ubertragsrate (ke/s) 
Anzahl der Arbeits- 
binder 


T 


GE-130, Kernspeicher 16 K 
Satzlénge 100 Zeichen 


\*) GE-120/130 


2 3 5 10 20 30 4G 80 EDD 


Anzahl der Siitze x 1000 
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Ubertragsrate (ke/s 
der Arbeits- 
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GE-130, Kernspeicher 24 Kj 
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Anzahl der Satze x 1000 
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Zeit Ubertragsrate (ke/s 
(in Minuten) Anzahl der Arbeits- 


binder 
a tien 


i GE-130, Kernspeicher 32K 
Satzlange 100 Zeichen 
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Anzahl der Sitze x 1000 
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5.3. Vergleichsphase 


Fur die Vergleichsphase wird nur eine grob geschitzte Zeit angegeben, 
da fir eine gréRere Genavigkeit zu viele Faktoren berticksichtigt werden 
mussen und die Vergleichszeit relativ klein ist. 


Aus der folgenden Tabelle geht die Anzahl der Zwischendateien hervor, 
die in der Vergleichsphase einer Mehrfachdatei gelesen oder geschrieben 
werden miissen, sowie die Anzahl der zu erwartenden Rickspu!ungen. Die 
Anzahl der Ruckspulungen ist in Klammem angegeben. 


Jede Spule entspricht in ihrer Lange einer Spule der Eingabedatei. Daraus 
kénnen die Lese- und Schreibzeiten berechnet werden, wobei angenommen 
wird, daB ein Viertel des Ubertrags kontinuierlich erfolgt. 


Die Zeit fUr das Riickspulen wird fur dieselben Spulenlingen wie beim Lesen 
und Schreiben berechnet, sollte aber auch die Zeit fur den Spulenwechsel 
enthalten. 

Die endgiiltige Ausgabe, die in der Tabellen nicht enthalten ist, benutzt 
nur dann Wechselstationen, wenn die entsprechende Eingabe mit einem 
Sternchen versehen ist. 
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Sortierprogramme auf Platte 


In den folgenden Tabelten ist angenommen worden, daSdem Sortierprogramm 
zwei Arbeitsdateien zugeordnet worden sind, die keine Platteneinheit oder 
keinen Plattenstape! gemeinsam benutzen. Die Zeiten sind von Variationen 
abhiingig, die sich aus der Verteilung der Daten bei der Eingabe ergeben. 


Es werden die Zeitkurven fUr Random-Dateien angegeben, deren Page-Gréfe 
bei der Eingabe und Ausgabe aus 3 Sektoren im 6-Bit-Modus besteht; die 
SatzgrdRe ist 25, 75 und 150 Zeichen. 


Die Diagramme sind ftir folgende Maschinenkonfigurationen zusammengestel lt 
worden: 


GE-130, Kernspeicher 16 K, 2 Platteneinheiten DSU 160 
GE-130, Kernspeicher 24 K, 2 Platteneinheiten DSU 160 
GE-130, Kernspeicher 32 K, 2 Platteneinheiten DSU 160 
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Zeit 
(in Minuten) 


100 


80 
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GE-130, DSU 160 


habe op pmtelange 25 Zeighen a 
| 


10 20 30.~«40~=«50 «60 «BO 100 


Anzahl der Sttze x 1000 
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Zeit 
(in Minuten) 


100 p>— : | 
5 GE-130, DSU 160 mae 
so} Satzliinge 75 Zeichen - Ik 
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Zeit 
(in Mittuten) 


ia 
GE-1'30, DSU 160 
Satzliinge 150 Zeichen ; IE. 


ae 
30 40 80 69) 8D CGD 


Anzahl der Satze x 1000 
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6 Beispiele fur die Anwendung des SPG 
6.1. Sortierprogramm auf einer Spule mit Fehlern 


in diesem Beispiel wird das Programm SPGTSTO7 (SYSTEM TEST NR. 1) 
angegeben, um die Fehlermeldungen des SPG zu zeigen. Im ndchsten 
Beispiel wird dasselbe Programm mit korrigierten Fehlern aufgefthrt, Der 
Ausdruck des Computers wird auf den folgenden Seiten dargestellt. 


Zeilen-Nr.t 


01150 


02010 


02050 


02110 


02130 


END 


GE-120/130 


Fehlernummer: 


Kommentare: 


121 


138 


143 


238 


253 


322 


343 


Der Dateityp ist X; in diesem Fafle 
mu6te er W sein. 


RM= 7; der Schreibmodus (RM) 
darf nur 6 oder 8 sein. 


PC = NRP=1 
Die Angabe mute lauten PC = N, 
RP=1. 


SK =0 
Der Mindestwert von SK ist 1. 


Dieser Fehler wird von dem vorher- 
gehenden Fehler verursacht: der 
Schlussel G1 ist nicht definiert. 


Es sind weniger als 3 Arbeitsdateien 
definiert worden, Dieser Fehler ist 
die Folge des Fehlers in der Zeile 
01150. 


Der Riicklauf ist nicht angegeben 
(Zeife 01130: RR = N) und die 
Wechselstation ist fur die Ausgabe- 
datei (Zeile 02050: AT = 4) definiert 
worden. Bei Verwendung einer 
Wechselstation mu® auch der Rick= 
lauf angegeben werden. 
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6.2. Sortierprogramm auf einer Spule 


Als Beispiel wird das Programm SPGTSTO7 (SYSTEM TEST NR. 7) angegeben. 
Der Ausdruck des Computers mit den Mefdungen fiir den Operator erfolgt am 
Ende dieser Beschreibung. 


Das SPG-Programm definiert das folgende Sortierprogramm auf Band. 


Das Objektprogramm beginnt auf der Kernspeicherposition 3000 (dezimal) 
und wird auf einer Maschine mit einem Kernspeicher von 32 K ausgefuhrt. 
Der Wiederanlauf fur das Schreiben von Checkpoints ist vorhanden, 


Die primire Eingabedatei (INPO7) wird als eine Banddatei auf einer 7/9-Spur- 
Einheit mit der Nummer 1 und einem Schreibmodus von 8, dh. 9 Spuren, oO 
einer Schreibdichte von 800 Bits pro Zoll und Unpaarigkeit definiert. Die 

Sdtze dieser Datet bestehen aus Blécken von 1.030 Zeichen variabler Lange 

(max. 1023 und mindestens 900 Zeichen); die letzten 5 Zeichen jedes Satzes 

werden ignoriert, Es wird angenommen, da8 die Datei einen Standardkenn— 

satz hat,und die ersten 5 Zeichen jedes Blockes enthalten die Blocknummer. 

(Fehit die Karte FLOP, werden implizite Werte angenommen). 


Die sekundire Eingabedatei (INPO7C) ist eine Kartendatei. Die Sttze dieser 
Datei bestehen aus Blécken von 50 Zeichen und variabler Lange (max. 50 
und mindestens 30 Zeichen). Die Sutze stehen in Karten mit 80 Spatten, 
jeder Satz beginnt in Spalte 1; jede Karte enthalt einen Satz. 


Es sind drei Arbeitsdateien erklart worden (WRKO7A, WRKO7B, WRKO7C), 
die jeweils auf die Bandeinheiten 1, 2 und 3 geladen werden. Es liegen 9-Spur- 
Bander vor mit einer Schreibdichte von 800 Bits pro Zoll und Unpaarigkeits- 


kontrolle. g 


Das Arbeitsband WRKOZA befindet sich auf einer Einheit ohne Ruckwartslesen 
(DV = MT), die anderen Arbeitsbiinder auf Einheiten mit Rickwartslesen 

(DV = SN). Das bedeutet, da8 ein Sortierprogramm ohne Riickwirtslesen 
generiert wird, Es wire besser gewesen, die Einheit ohne Ruckwartstesen 

der Eingabedatei zuzuordnen, In diesem Falle hatte ein Sortierprograram 

mit RUckwartslesen erstellt werden kénnen, wodurch die Zeit fur das RUckspulen 
gespart worden wire, 


Die Ausgabedatei(OUTPO7) wird als Banddatei auf einer 7/9-Spur-Einheit 
mit der Nummer 3 definiert. Auf der Einheit 4 ist eine Wechselstation 
definiert worden, Diese wird nur dann benutzt, wenn nicht alle Daten auf 
dem Band gespeichert werden kénnen, das auf der Einheit 3 aufliegt. Das 
Band wird auf 9 Spuren mit einer Schreibdichte von 800 Bits pro Zolf und 
Unpaarigkeitskontrolle geschrieben, 
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Die Sperrdauer der Datei betragt 1, 2, 3 Tage. Die Sdtze werden in 
Blécken von 1027 Zeichen mit variabler Linge geschrieben (max, 1022 
und mindestens 899 Zeichen). Am Ende der Sitze stehen 4 Leerzeichen, 
da die Sdtzeum 4 Zeichen vergrdBert worden sind. Da keine Karte FLOP 
vorliegt, werden die Blécke wieder numeriert. 


Die Arbeitsdatei WRKO7C wird von der Ausgabedatei Uberlagert. Fur die 
Ausgabedatei ist keine neve Bandspule erforderlich, 


Der Schlussel G1 beginnt in Spalte 1 des Satzes mit einer Lange von 2, 
Mit dem alphanumerischen Schlussel wird absteigend sortiert. 


Nach dem Auflisten und Prifen des SPG-Programms wird das Objekiprogramm 
generiert und vom APS assembliert, Die APS~Auflistung des Objektprogramms 
wird nach der Zeile .APS gedruckt. Das resultierende Programm wird mit dem 
Befehl .AP! auf das Systemband geschrieben. 


Jetzt ist das Programm SPGTSTO7 fur die AusfUhrung vorbereitet. Das 
Programm wird mit .PRL geladen, Es folgen die Karten KLBC fur die Band- 


dateien. 
Die folgenden Meldungen sind Anweisungen an den Operator. 


Alle Checkpoints werden geschrieben. Sie enthalten die Einheitennummer, 
wo der Checkpoint geschrieben wurde. 
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Mischprogramm 


Das Mischprogramm SPGTST25 (SYSTEM TEST NR. 25) wird hier aufgefuhrt, 
um ein typisches Dateimischprogramm zu zeigen, Dazu gehiren die Me!- 
dungen fiir den Operator. Der Computer-Ausdruck wird am Ende dieser Be- 
schreibung aufgefuhrt, 


Das SPG-Programm definiert das folgende Mischprogramm: 


Das Objektprogramm beginnt auf der Kernspeicherposition 3000 (dezimal) 
und wird auf einer Maschine mit einem Kernspeicher von ]2 K und der 
Maglichkeit des Riicklaufes ausgefithrt. 


Es werden die Eingabedateien INP25A und INP25B auf den Magnetband- 
einheiten 4 bzw, 5 definiert. 


Die Ausgabedatei OUTP25 wird auf der Magnetbandeinheit 7 definiert, 


Alle Dateien werden auf einem 9-Spur-Band mit einer Schreibdichte von 

800 Bits pro Zol] und Unpaarigkeitskontrolle geschrieben. Die Sdtze werden 
nicht geblockt und haben eine Lénge von 100 bis 40 Zeichen, Der Parameter 
fiir die Blockgré8e mu® spezifiziert werden, so daB der Generator entsprechend 
groBe Puffer fir die Eingabe-/Ausgabetberirage generiert. 


Das Mischprogramm wird unter Verwendung eines alphanumerischen Schlissels 
ausgefushrt, der in der Position 12 beginnt und die Linge von 6 Zeichen hat. 
Die resultierende Sequenz ist in absteigender Ordnung sortiert. 


Dasselbe Verfahren wie bei SPGTSTO7 wird benutzt, um das Objektprogramm 
zu generieren, assemblieren, speichern und auszufiihren. 


Wahrend der Ausfihrungszeit werden die Anweisungen fiir den Operator aus- 
gedruckt. 
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6.4. Sortierprogramm auf Platte 


Das Programm DSCSPGi1 (SPG EDOS SYS-TEST 11) wird hier angegeben, 
um ein Sortierprogramm mit den Operator-Meldungen zu zeigen. Der 
Computer-Ausdruck wird am Ende dieser Beschreibung wiedergegeben, 


Das SPG-Programm definiert das folgende Sortierprogramm auf Platte. 


Die Generierung erfolgt von der Kernspeicherposition 5000 an auf einer 
Maschine mit einem Kernspeicher 16 K, Es werden keine Checkpoints ge- 
schrieben. 25 Zeichen der"Common Storage" werden reserviert. Die 
Eingabedatei (INP) befindet sich auf der Platteneinheit 1; sie ist im 8-Bit- 
Modus geschrieben und enthalt eine Overflow-Zone, Die Stitze haben 

eine Ltinge von 80 Zeichen und sind in Blécken von 800 Zeichen ange~ 
ordnet. Die Stitze haben feste Linge. Sdtze, in denen das 5, Zeichen ein 
Sternchen ist, werden ignoriert. Es werden zwei Arbeitsdateten benutzt: 
WKI auf der Platteneinheit Null und WK2 auf der Platteneinheit 1. 

Die Ausgabedatei (OUT) befindet sich auf der Platteneinheit 2 und hat den- 
selben Satzaufbau wie die Eingabedatei. Die Datei wird gemaB zweier 
Schlussel DI und D2 sortiert. Der Schltissel D1 besteht aus 6 ungepackten 
numerischen Zeichen und beginnt mit dem Zeichen 11; es wird in absteigen- 
der Folge sortiert. Der Schlussel D2 besteht aus 10 alphanumerischen Zeichen, 
die auf dem Zeichen 21 beginner; die Sequenz wird in aufsteigender Folge 
sortiert. 


Die Zusatzroutine NN4 fur die Eingabe wird benutzt. Nach dem Lesen 
jedes Eingabesatzes wird in diese Routine gesprungen, wo die Anzahi der 
Saétze geztihlt wird, Das Zéhlerergebnis steht auf der Adresse 16360 (PO) 
der Common Storage. 


Es werden die Zusatzroutinen PP2 und PP4 fiir die Ausgabe benutzt. Vor dem oO 
Schreiben jedes Ausgabesatzes wird in die Routine PP2 gesprungen, wo die 

Anzahl der Satze, die bei der Ausgabe geschrieben werden, gezthlt wird. 

Die Anzahl der Sdtze mit einem Sternchen in Spalte 5 werden separat ge- 

za@hlt. Nach Ausfthrung aller anderen Verarbeitungen wird in die Routine 

PP4 gesprungen. Diese Routine druckt die Anzahl der Eingabesttze, die 

Anzahl der Ausgabestitze und die Anzahi der Sdtze mit einem Sternchen. 


Der EDOS~-SPG generiert ein im APS-Code abgefafites Sortierprogramm in 
die freie Zone auf die Systemplatte. Der APS-Assembler tibersetzt dieses 
kompilierte Programm in das Objektprogramm auf Platte 1. Das EDOS- 
Programm .API fiigt das endgiiltige Objektprogramm in die Programmdatei 
auf der Platteneinheit 1 ein. 


oO 


GE-120/130 ee 
Ref.-Nr.: 32.30.307 D 
Juni 1970 


~ 139 


Zur AusfUhrung des Sortierprogramms DSCSPG11 wird das EDOS-Programm 
»LOAD zusammen mit den LBC-Karten fUr die Plattendateien benutzt, 

Die folgenden Meldungen sind Anweisungen fir den Operator. Nach der 
Meldung END OF JOB werden die Meldungen aus der Routine PP4 gedruckt. 
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Anhang 
Worterbuch 


Aufsteigende Sequenz: 


Wenn der Schlussel mit dem htheren: Wert fiir zwei Stitze mit aufsteigender 
Sequenz definiert ist, steht der Satz mit dem niedrigeren Wert in diesem 
Schlussel vor dem anderen Satz in der Ausgabedatei. 


Zusatzsektion: 


Die APS-Kodierung im Ursprungsprogramm wird in Zusatzsektionen unterteilt. 
Der Name, der diesen Sektionen zugeordnet ist, gibt dem Generator die Phase 
des Objektprogramms an, in der diese Sektionen eingeschlossen werden. 


Monotonie: 


Beim Sortieren grofer Datenmengen werden die erstellten Zwischendateien 
auf Band mehrfach gemischt, woraus eine einzige vollstindig sortierte Datei 
hervorgeht. Die Zwischendateien selbst werden durch die Anwendung einer 
anderen Technik erstellt (Polyphases Sortieren). 


Absteigende Sequenz: 


Wenn der Schlussel mit dem héheren Wert fur zwei Sdtze mit absteigender 
Sequenz definiert worden ist, steht der Satz mit dem gréReren Schlussel vor 
dem anderen Satz in der Ausgabedatei. 


Generator; 


Der Sortierprogramm-Generator ist ein System, das optimale Sortier- oder 
Mischprogramme mit verschiedenen Eingabe- und Ausgabemedien, verschie- 
denen Formaten, mit Own-Coding-Routinen an bestimmten Programmpunkten, 
usw. im Sourceformat erstellt. Die Eingabe wird mit Ursprungsprogramm und 
die assemblierte Ausgabe mit Objektprogramm bezeichnet . 


Internes Sortieren: 


Diese Routine sortiert eine Reihe von Satzen im Kernspeicher gema® den fir 
die endgiiltige Ausgabe spezifizierten Kriterien, 
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Schlussel: 


Damit wird ein Feld in einer festen Position in allen Eingabestitzen bezeichnet. 
Wenn nur ein SchlUssel vorliegt, definieren die verschiedenen Werte in ver- 
schiedenen Sutzen die erforderliche Sequenz in der Ausgabedatei. Wenn 
mehrere Schlussel in einem Satz enthalten sind, wird fUr sie eine Prioritat 
festgelegt, 


Hauptprogramm: 


Das Hauptprogramm ist das gesamte Objektprogramm mit Ausnahme der APS- 
Kodierung, die der Benutzer im Ursprungsprogramm zur Verfiigung stellt. 


Mischen: 


Bei diesem Verfahren werden Datenfolgen, die aus einer Rethe von Eingaben 
bestehen, zu einer einzigen Datenfolge zusammengefaGt. Es werden die ersten 
Satze jeder Folge gemaf ihren Schliisseln verglichen. Das Verfahren wird 
fortgesetzt, bis alle Eingabefolgen bearbeitet sind. Das Mischen selbst kann 
ein vollstandig abgeschlossenes Verfahren sein, z.B. in einem File Merge, 

wo eine Anzahl von sortierten Dateien gemischt wird, um eine einzige 

Datei zu erstellen, Das Mischen kann auch eine vollstindige Phase eines 
Sortierprogramms sein, oder kann als Haupthestandteil einer Sortierroutine 
benutzt werden, wo wiederholte Anwendungen zu weniger und gréReren 
Datenfolgen fuhren, bis samtliche Daten vollstiindig sortiert worden sind. 


Objektprogramm: 

Die assemblierte APS-Ausgabe vom Generator wird Objektprogramm genannt. 
Polyphases Sortieren: 

Eine Technik zum Sortieren einer vollstandigen Datei oder einer Spule aus 
einer Mehrfachdatei, Es werden mindestens 3 Bandeinheiten zur Aufnahme 
der Arbeitsbinder benutzt, dabei werden die Datenfolgen eingegeben, die 
beim Vorsortieren verteilt werden. 


Vorsortieren: 


Der erste Lauf weicht von den folgenden Laufen ab. Es werden unsortierte 
Satzgruppen der urspriinglichen Daten eingegeben, die im Kernspeicher zu 
einer Datenfolge sortiert werden. Die Datenfolgen werden auf die Arbeits~ 
einheiten in der entsprechenden Sortiermethode verteilt. Wahrend dieses 
Durchlaufs werden auch die Siitze auf das interne Format umgeschliisselt . 
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Sortierprogramm: 


Damit wird die Bearbeitung von nicht-sortierten Daten bezeichnet, deren 
endgultige Ausgabe eine vollstdndige sequentielle Version der Eingabe 
darstellt. Die meisten Sortierprogramme bestehen aus der Anwendung der 
Mischtechnik mit charakteristischer Verteilung der Datenfolgen. 


Ursprungsprogramm; 


Dieses Programm spezifiziert die Art des Sortier= oder Mischprogramms, 

das vom Generator erstellt wird. Das Ursprungsprogramm besteht aus SPG- 
Befehlen und wahlweise auch aus APS-Befehlen, womit nicht-standardméGige 
Funktionen des generierten Programms ausgefUhrt werden kénnen. Ursprungs- 
programme kénnen in Lochkarten auf Band oder auf Platte stehen. 


Datenfolge: 


Damit wird eine Folge von sortierten Sttzen bezeichnet, die aneinander- 
grenzende logische Positionen auf Band, Platte oder im Kernspeicher belegen. 
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7.2, Zustitzliche Unterlagen 
Code Titel 
P-A GE~130 Systemhandbuch 
P-A GE-120 Systemhandbuch 
P-A/O GE-120/130 APS-Handbuch 
R-A ETOS Programmierhandbuch 
R-A ETOS Operatorhandbuch 
R-A EDOS Programmierhandbuch 
R-O EDOS Operatorhandbuch 
Code P: Wird als bekannt vorausgesetzt 
Code R: Zur Lektdre empfohlen 
Code A: Programmierer, Analytiker 
Code O: Operator 

GE-120/130 


Ref .-Nummer 

32.20.001 identisch 
32.20.001 D 

32.30.107 D 

32.38.009 D 

32.53.505 D 

32,.38.010 (D in Vorbereitung) 
32.53.508 (D in Vorbereitung) 
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area used inthe sort or merge. 


It should be noted carefully that if one or more subroutines are called (by means 
of the SUB statement) from more than one auxiliary routine, then these subrouti- 
nes will be stored at the start address of the generated program, and the sum of 
their lengths (including the lengths of further subroutines called by the primary 
subroutines) will always be in core. 

Hence, the user is advised against using any subroutine in more than one use 
auxiliary routine. This is not regarded as an error condition, but the SPG 
working area will be decreased as a result. 


FORMAL ERRORS IN THE SOURCE PROGRAM 


ERROR NUMBER: 104 
Catastrophic 


A subroutine present in a User Auxiliary Routine itself calls a subroutine rele- 
vant to the EIOS macrostatements, i.e, a "disc subroutine’, Refer to error 
message 382. This condition occurs only under EDOS. 


ERROR NUMBER; 105 
Non-Catastrophic 


This error is signalled if columns 50 and 51 of the .SPG order card under 

ETOS are both blakk, and columns 53 is not blank, If 50 and 51 are blank, no 
tape input of parameters or User routines is expected, whereas col. 53 describes 
tape input parity, Listing may be unreliable. 


ERROR NUMBER: 121 
Catastrophic 


The file-type operand (i.e. the second field on the DVC macrostatement) is 
unrecognisable. 


ERROR NUMBER: 124 
Catastrophic 


An unknown device type has been found. Note that in the case of "CR" and "UN", 
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no further operands are allowed on the DYC macro and in these two cases the 
device type must be terminated with a "blank". In the other case, further 
operands are compulsory and the device type must be terminated with a comma. 


ERROR NUMBER: 125 
Catastrophic 


An undefined file (DV = UN) has been declared which is not as input file. 
- 


ERROR NUMBER: 126 
Catastrophic 


More than one undefined file has been declared. 


ERROR NUMBER: 130 
Catastrophic 


The multi-reel parameter "MR=" is not applicable to work files. 
ERROR NUMBER: 134 
Not Used. 


ERROR NUMBER: 136 
Catastrophic 


The "FE" operand has an incorrect value, This can also mean that one or more 
of the work file volumes has a unit number greater than 7. This error may cause 
further errors to be signalled. 

ERROR NUMBER: 156 

Not used. 


ERROR NUMBER 160 


Not used. 
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ERROR NUMBER : 202 
Non-C atastrophic 


The value and type of the deletion operand on the FLD macrostatement might 
mean the deletion of almost all records on the input file, This is a warning 
signal only, in the case of a possible card-punching error, 

Generation is possible. 


ERROR NUMBER: 283 
Catastrophic 


The value deseribed by an operand is not terminated by a "comma" for "blank", 
This may give rise further error signals, 


ERROR _ NUMBER: 289 
Catastrophic 


The numeric value of the 'BS=" operand and the FLD macro is terminated by a 


"blank" which signifies the end of the card, However, more compulsory 
operands must follow, 


ERROR NUMBER: 301 
Catastrophic 


A card has been found in a User Routine with an asterisk in column 18 and 2 
non-blank character in column 19, This seems to be BIOS subroutine call, 
which is not allowed in this form, Refer to Section C (part I). 


ERROR NUMBER: 362 
Catastrophic 


One of the illegal macrostatements in the APS language has been found ina 
User Auxiliary Section, 


ERROR NUMBER: 322 
Catastrophic 


oO Less than 3 tape work files have been declared for a sort. 
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ERROR NUMBER: 351 
Catastrophic 


There are five possible working areas in core, determined by the starting 
address on the STRT macro, and the operand "CS=" on the OBJP macro, 
plus the three small areas in the Supervisor described in Part II, Section C, 
THE AUXILIARY SECTIONS. 


ERROR NUMBER: 353 
Catastrophic 


The fields defined by DS directives in one of the two possible free working 
areas exceed the size limits of the working areas and thus overflow has 
occurred into the area reserved for the generated program, or the storage 
capacity has been exceeded, or the limits of the three small supervisor areas 
have been exceeded. 


ERROR NUMBER: 367 
Catastrophic 


An illegal value has been found for the operand "OD="' on the EDOS .SPG order 
eard, 


The acceptable values are "0" to "7", "SD" or "WD", 
This error is signalled only under EDOS. 


ERROR NUMBE: 69 
Non-Catastrophic 


The operand "RM=" has been found on the .SPG call card, with no indication 
earlier that the macrostatements are stored on the System Disc (i.e. by the 
absence of the operand "MS"), This error is signalled only under EDOS, It is 
assumed that the parameters are present on cards, 
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ERROR NUMBER: 382 
Catastrophic 


A User Auxiliary Routine includes a subroutine relevant to the EIOS macrosta- 
tements, i.e. a "dise subroutine”. This type of subroutine is indicated by the 
character "D" in the fifth column of subroutine library output from the program 
. LIST. Such subroutines are not permitted in an SPG object program, because 
either the program structure is altered drastically or such EIOS operations are 
not permitted during a SORT or MERGE program. 


ERROR NUMBER: 383 
Catastrophic 


The card-reader has been found empty, but with the "end-of-file" switch set, 
before all the compulsory SPG macrostatements have been read, 


ERROR NUMBER: 451 
Catastrophic 


After the operand "TW =S,", the compulsory operand "C P=" cannot be found. 


ERROR NUMBER : 452 
Catastrophic 


‘The value of the concurrent program area operand "C P="' is in error, 

This could be due to it having a decimal value greater than 32767, a zero value, 
containing a nonnumeric character or it not being terminated by a "blank" 
character, 


ERROR NUMBER: 453 
Catastrophic 


The sum of the start address, the common storage area (if declared) and the 
concurrent program area exceeds the declared memory size, 
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ERROR NUMBER: 454 
Catastrophic 


It is not permissible to overlay the output file on the same work file that 
overlays the input file. In the case of a tape sort with tape Input and output 
file, this error is signalled also if these abovementioned three files are 
declared on the same unit, with or without explicit overlay declarations. 


ERROR NUMBER: 455 
Catastrophic 


The operand "FO=" can only be used for a dise input file, 


ERROR NUMBER 456 
Catastrophic 


The value of the "FO=" operand is incorrect. 


ERROR NUMBER: 457 
Catastrophic 


A random access disc file ("FO = R") cannot tnclude an overflow zone, 


ERROR NUMBER: 458 
Catastrophic 


The block-size (or page size), in sectors, of a random access disc file, 
when rounded-up to the next integral sector, must be one of the following 
values: 1, 2, 4, 5, 10 or 20 sectors, 


ERROR NUMBER: 459 
Catastrophic 


A random disc file is not allowed as input to a MERGE program. - 
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ERROR NUMBER: 460 
Catastrophic 


A T-track tape ("RM = 6") cannot be recorded at 1600 bits per inch ("PK =P"), 


ERROR NUMBER: 461 
Catastrophic 


A random disc file cannot be overlaid by any other file, 


ERROR NUMBER: 462 
Catastrophic 


A User Comparison Routine is not allowed when a disc-address ("SF = A") or a 
disc-address plus keys ("SF = M") sort is specified. 


ERROR NUMBER: 463 
Non-catastrophic 


It is not recommended to overlay the input file with any other file for a dise- 
address or disc-address plus keys ("SF=A" or "SF=M"'!) sort, as the output 
file contain information relating to the original input file, This error is a 
warning only, in the case that the dise pack containing the original input file is 
to be removed before the sort phase at run-time. 


ERROR NUMBER: 464 
Catastrophic 


A random dise file cannot be composed of variable length records. 


ERROR NUMBER: 465 
Catastrophic 


The operand 'PM=P"' has been used for a tape wark which is not on unit 8 
(i.e, it is not the System Tape). Signalled only in ETOS. 
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ERROR NUMBER: 466 
Catastrophic 


The work-file with the non-standard positioning mode '"PM=E" cannot be 
overlaid on the input tape if the latter is not a single~reel file, 


ERROR NUMBER; 467 
Non-catastrophic 


The tape work-file with the non-standard positioning mode "PM=" has been 
declared on the same unit number as the input file, but without these files 

being in overlay. It is suggested either that the two files be declared in overlay 
or the non-standard work file be declared on a different unit. 


As it stands, the generated program will not conserve the input file if this file 
is used as the work tape. 


ERROR NUMBER: 468 
Catastrophic 


This error signals insufficient space for object program generation on the 
output fisc, The output dise is defined on the .SPG order card. These minimum. 
values are: 


9 cylinders if output is to the System Dise 
8 cylinders if output to a disc other than the System Disc. 


Note that these values may not in themselves be large enough, in which case a 
fixed halt will occur (See Sextion E: OBJECT PROGRAM HALTS), but for a 
free-area less than the above values, generation will not be possible even for 
the smallest object program, - 


ERROR NUMBER: 469 
Catastrophic 


This error signals that no space is available on the System Dise for temporary 
storage of User Auxillary Routines. 
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7.3. Fehler im Ursprungsprogramm 


Format- oder Inhaltsfehler, die im Ursprungsprogramm festgestellt werden, 
haben die Nummern von 100 bis 444. Jeder Fehler wird entweder mit 
"blockierend" oder "nicht-blockierend" bezeichnet. Blockierende Fehler 
lassen die Generierung eines Objektprogramms nicht zu, obwohl normaler- 
weise die Auflistung des Ursprungsprogramms ausgefuhrt wird; dagegen ist 

die Analyse des Rests unzuverlissig. Nicht-blockierende Fehler erlauben 

die Generierung, wobei Annahmen gemacht werden, die vor der Kompilierung 
des Objektprogramms gepriift werden miissen. 


Die Fehlernummern werden unter die Zeile des Ursprungsprogramms gedruckt, 
worauf sie sich beziehen und sofern der Fehler in diesem Stadium festgestellt 
werden kann; andernfalls werden sie am Ende der Auflistung ausgedruckt. 


Wenn ein oder mehrere blockierende Fehler festgestellt werden, erfolgt der 
Ausdruck folgender Zeilen: 


ONE OR MORE CATASTROPHIC ERRORS HAVE BEEN FOUND 
IN THE SPG PARAMETER CARDS 
GENERATION [5 NOT POSSIBLE 


ERROR NUMBER: 100 
blockierend 


Es sind mehr als 13 Dateinamen vorgefunden worden. Damit ist die zulussige 
Anzahl von Dateien tberschritten worden. Wenn nicht weitere Karten DVC, 
FLOP oder FLD vorliegen, werden sie nicht verarbeitet. Nach diesem Fehler 
ist die Auflistung unzuverléssig. 


ERROR NUMBER: 101 
blockierend 


Die Karte .SPG weist darauf hin, da® die folgenden SPG-Makrobefeble in 
Lochkarten stehen und da die Zusatzroutinen des Benutzers auf Magnetband 
stehen. Diese Kombination ist nicht zulassig. 


ERROR NUMBER: 102 
nicht-blockierend 


Die Karte .SPG gibt an, da® die folgenden SPG-Makrobefehle auf Band 


stehen und die Spalie 52 der Karte .SPG ein Leerzeichen enthalt. Es wird 
eine Schreibdichte von 800 Bits pro Zoll angenommen. 


GE-120/130 


Ref .-Nr.: 32,30.307 D 
Juni 1970 


- 152 ~ 


ERROR NUMBER; 103 
nicht-blockierend 


In Spalte 52 der Karte .SPG steht ein unbekanntes Symbol zur Angabe der 
Schreibdichte, Der Wert 800 Bits pro Zoll, der falsch sein kann, wird an- 
genommen, In diesem Falle wird spdter HALT signalisiert. 


ERROR NUMBER; 104 
blockierend 


Etne Subroutine, die selbst von einer Zusatzroutine des Benutzers angerufen 
wurde, ruft eine nicht-standardméRige Subroutine an. Siehe Fehlermeldung 382. 
Dieser Fehler wird nur bei Verwendung des EDOS signalisiert. 


oC 


ERROR NUMBER: 105 
nicht-blockierend 


Dieser Fehler wird signalistert, wenn die Spalten 50 und 51 je ein Leerzeichen 
und Spalte 53 kein Leerzeichen enthalten. Wenn die Spalten 50 und 51 ein 
Leerzeichen enthalten, wird keine Bandeingabe der Parameter oder der 
Routinen des Benutzers erwartet. Spalte 53 beschreibt die Paarigkeitskontrolle 
bei Bandeingabe. Die Auflistung kann unzuverldssig sein. 


ERROR NUMBER: 106 
nichtblockierend 


Es ist keine Karte STRT gefunden worden. Es wird angenommen, daf die 
Generierung auf einer Maschine mit einem Kernspeicher 12K erfolgt und 

dai die Startadresse des Programms unmittelbar hinter dem Ende des Operating 
Systems liegt. Diese Annahmen kénnen weitere Fehler verursachen, die 


spdter wahrend der Auilistung signalisiert werden. oO 


ERROR NUMBER; 107 
blockierend 


Es liegt ein unbekannter Makrobefehl vor, Dieser Fehler wird signalisiert, 
wenn die Rethenfolge der Karten gestért ist, wenn obligatorische Karten 
ausgelassen worden sind oder wenn vor Benutzerroutinen der Makrobefehl 
EAPS nicht angegeben wurde. 


ERROR NUMBER: 108 
blockierend 


Die Startadresse ist zu hoch. Dieser Fehler tritt auf, wenn die Startadresse 
groBer als der Kernspeicher ist. 
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ERROR NUMBER: 109 
nicht-blockierend 


Es ist mehr als ein Makrobefehl STRT angegeben worden. Es werden nur die 
Werte der ersten Karte STRT benutzt. Dieser Fehler kann andere Fehler nach 
sich ziehen. 


ERROR NUMBER: 110 
nicht-blockierend 


In der Karte STRT ist der Operand 2, der die Kernspeichergréfie spezifiziert, 
fehlerhaft. Entweder enthilt das einstellige Feld nicht einen der 4 méglichen 
Werte oder es folgt kein Leerzeichen auf diesen Wert. Es wird ein Kern- 
speicher mit 12K angenommen, was zu weiteren Fehlern fihren kann. 


ERROR NUMBER: 171 
nicht-blockierend 


In der Karte STRT ist der Operand 1, der die Startadresse angibt, zu klein. 
Der spezifizierte Wert gibt eine Adresse an, die im Operating System steht. 
Es wird die niedrigste zulissige Adresse angenommen, was zu weiteren 
Fehlern fthren kann. 


ERROR NUMBER: 112 
nicht-blockierend 


Vor demersten Makrobefehl DVC ist kein Makrobefehl OBJP gefunden worden. 
Es wird angenommen, daf erneutes Starten gefordert und keine Zone 

"Common Storage" reserviert wurde. Diese Annahmen kénnen zu weiteren 
Fehlern wahrend der Auflistung fuhren. 


ERROR NUMBER: 113 
nicht-blockierend 


Vor dem ersten Makrobefehl DVC sind mehr als 1] Makrobefehl OBJP vorge- 
funden worden, Es werden nur die ersten Werte des ersten Makrobefehls 


OBJP benutzt. 


ERROR NUMBER: 114 
blockierend 


Der Operand 1 im Makrobefehl OBJP hat einen unkenntlichen Wert. Entweder 
fehlt das Komma oder er ist falsch gelocht worden. 
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ERROR NUMBER; 115 
blockierend 


Ein ungultiger Wert fur die "Common Storage" ist vorgefunden worden, Es 


gibt die folgenden Moglichkeiten: Ein nichtenumerisches Zeichen, eine Zahl 
groGer als 32767, ein Wert Null, eine Zahl mit Vorzeichen, mehr Stellen 
als zulassig, auf die Zahl folgt kein Komma oder # bzw, die Summe der Zone 
"Common Storage" und die Startadresse ist gréGer als der Kernspeicher. 


ERROR NUMBER: 116 
blockierend 


In der Auflistung sind zwei aufeinanderfolgende Makrobefehle FLOP vorge= 
funden worden. Der zweite Befehl wird nicht bericksichtigt. 


ERROR NUMBER: 117 
blockierend 


Der Dateiname in der Karte DVC hat ein ungultiges Format: Der Name besteht 
aus mehr als 6 Zeichen, er endet nicht mit einem Komma oder einem Leer- 
zeichen, das erste Zeichen ist ein numerisches Zeichen oder Y bzw. das erste 
und zweite Zeichen sind gleich. 


ERROR NUMBER: 118 
blockierend 


Der Dateiname in der Karte DVC ist in einer friheren Karte DVC benuizt 
worden, 


ERROR NUMBER; 119 
blockierend 


In der Auflistung sind zwei aufeinanderfolgende Makrobefehle FLD vorge- 
funden worden, Der zweite Befehl wird nicht bericksichtigt. 


ERROR NUMBER: 120 
blockierend 


In dem Makrobefeh] DVC sind die obligatarischen Zeichen "DV=" nicht 
vorgefunden worden, 


ERROR NUMBER; 121 
blockierend 


Die Dateiart Ist nicht erkennbar, 
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ERROR NUMBER: 122 
blockierend 


Es ist eine Kartendatei (DV = CR) definiert worden, die keine Eingabedatei 


ist. 


ERROR NUMBER: 123 
blockierend 


Es ist mehr als eine Kartendatei definiert worden, 


ERROR NUMBER: 124 
blockierend 


Ein unbekannter Gertitetyp ist vorgefunden worden. Wenn "CR" und "UN" 
vorliegen, durfen keine weiteren Operanden in dem Makrobefehl DVC an- 
gegeben werden, und das letzte Zeichen der Gertteart ist ein Leerzeichen. 
Andernfalls mUssen weitere Operanden angegeben werden, und das letzte 
Zeichen der Gerdfeart ist ein Komma. 


ERROR NUMBER: 125 
blockierend 


Es ist eine nicht-definierte Datei (DV = UN) angegeben worden, die keine 
Eingabedatei ist. 


ERROR NUMBER: 126 
blockierend 


Es ist mehr als eine nicht-definierte Datei angegeben worden. 


ERROR NUMBER: 127 
blockierend 


In dem Makrobefehl DVC sind die fur Platten- und Banddateien obligatori- 
schen Zeichen "MT=" nicht vorgefunden worden. 


ERROR NUMBER; 128 
blockierend 


In dem Makrobefehl FLOP sind die folgenden Operanden-Kombinationen 
vorgefunden worden: OZ =A (implizit oder explizit), CH= Y und ein 
Wert ungleich Null im Operanden "KS=". 
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ERROR NUMBER: 129 
blockierend 


Die Einheitennummer ist mit einem falschen Wert angegeben worden. 


ERROR NUMBER: 130 
blockierend 


Fur eine Arbeitsdatei ist der Parameter "MR=" angegeben worden, 


ERROR NUMBER: 13) 
blockierend 


Der Operand MR ist mit einem ungultigen Wert angegeben worden. Daraus oO 
kénnen weitere Fehler entstehen, 


ERROR NUMBER: 132 
biockierend 


Fur eine Arbeitsdatei ist der Operand "AT=" angegeben worden. 


ERROR NUMBER: 133 
blockierend 


Im Makrobefehl DVC ist der Operand AT mit einem ungilltigen Wert ange- 
geben worden. 


ERROR NUMBER: 134 
blockierend 


tm Makrobefehl DVC ist eine Arbeitsdatei mit dem Operanden "MT=8" oO 
definiert worden, d.h.,die Arbeitsdatei ist als Systemband definiert worden; 
die Schreibdichte ist ungleich 800 Bits pro Zoll. 


ERROR NUMBER: 135 


blockierend 


In dem Makrobefehl DVC ist der Operand "FE=" fur eine Datei benutzt 
worden, die nicht auf Platte steht. Daraus konnen weitere Fehler entstehen. 


ERROR NUMBER: 136 
blockierend 


Fur den Operand FE (File Extension) ist ein ungultiger Wert benutzt worden. 
Aus diesem Fehler kénnen weitere Fehler entstehen. 


Oo 
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ERROR NUMBER; 137 
blockierend 


In dem Makrobefeh! FLD ist der Wert des Operanden "GL="" gréffer als der Wert des 
Operanden "BS=". 


ERROR NUMBER: 138 
blockierend 


In dem Makrobefehl DVC enthalt der Operand "RM=" einen ungultigen 
Wert. 


ERROR NUMBER: 139 
blockierend 


in dem Makrobefehl FLD ist der Wert des Operanden "LL=" gréGer als der 
Wert des Operanden "BS=", 


ERROR NUMBER: 140 
nicht-blockierend 


Der Wert fur die Schreibdichte in dem Operanden "PK=" ist falsch benutzt 
worden: entweder wird efne Plattendatei durch einen Wert flr eine Band- 
date! oder eine Banddatei durch einen Wert fur eine Plattendatei definiert. 
In diesem Falle wird der einzig mégliche Wert fur eine Plattendatef und 
eine Schreibdichte von 800 Bits pro Zoll fur eine Banddatei angenommen. 


ERROR NUMBER: 141] 
blockierend 


In dem Makrobefehl DVC hat der Operand "PK=" einen ungultigen Wert.” 


ERROR NUMBER: 142 
blockierend 


In dem Makrobefehl DVC ist der Operand “PC=" (Paarigkeitskontrotle) fur 
eine Datei benutzt worden, die nicht auf Band steht. 


ERROR NUMBER; 143 
blockierend 


In dem Makrobefehl DVC ist fur den Operanden “PC=" ein ungultiger 
Wert benvtzt worden. 
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ERROR NUMBER: 144 
nicht-blockierend 


In dem Makrobefeh] DVC ist der Operand "RP=" (Sperrdauver) fUr eine Ein- 
gabe- oder Arbeitsdatei benutzt worden. 


ERROR NUMBER: 145 
blockierend 


In dem Makrobefeh! DVC ist fur den Operanden "RP=" ein ungultiger Wert 
benutzt worden. Dieser Fehler wird in den folgenden Fallen signalisiert: 
Das Zahlenfeld enthalt nicht~numerische Zeichen, das Zahlenfeld besteht 
aus mehr als 3 Stelfen, das Zahlenfeld hat einen Wert Null (in diesem Falle 
sollte der gesamte Operand ausgelassen werden), das Zahlenfeld hat ein 
Vorzeichen oder endet nicht mit einem Leerzeichen. 


ERROR NUMBER: 146 
blockierend 


Der Dateiname in dem Makrobefehl FLOP stimmt nicht mit dem Dateinamen in 
dem vorhergehenden Makrobefehl DVC uberein, Entweder ist der Name falsch 
gelocht worden oder die Reihenfolge der Lochkarten stimmt nicht, 


ERROR NUMBER: 147 
blockierend 


Der Operand "LB=" ist in einer Datei benutzt worden, die keine Eingabe- 
datei auf Band ist. 


ERROR NUMBER; 148 
blockierend 


Der Operand “LB=" in dem Makrobefehl FLOP enthélt einen ungiltigen 
Wert. 


ERROR NUMBER: 149 
blockierend 


Ein nicht-standardmaBiger Kennsatz ist mit einem der Parameter "MR=", 
"ATs" oder "FE=" benutzt worden. Eine nicht-standardmaRige Datei kann 
immer nur eine Eingabedatei auf einer Spule sein, 


ERROR NUMBER; 150 
blockierend 


In dem Makrobefeh| FLOP ist der Operand "OR=" mit dem vorhergehenden 
Operanden "LB=S," benutzt worden. 
el 
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ERROR NUMBER: 151 
blockierend 


In dem Makrobefeh! FLOP ist der Name der Zusatzroutine fur die Datei- 
erdffnung fehlerhaft. Es kénnen die folgenden Ursachen vorliegen: Der 
Name besteht aus mehr als 6 Zeichen, er endet nicht mit einem Komma 
oder einem Leerzeichen, es werden andere Zeichen als 0-9 oder A-Z 
benutzt, der Name beginnt mit dem Buchstaben Y oder einer Zahl, die 
ersten zwei Zeichen des Namens sind gleich. 


ERROR NUMBER; 152 
blockierend 


Der Operand "OR=" liegt nicht vor, obgleich der vorhergehende Operand 
in dem Makrobefeh! FLOP "LB=N," lautete. 


ERROR NUMBER; 153 
nicht-blockierend 


In dem Makrobefeh! FLOP, der eine Arbeitsdatei beschreibt, ist der Operand 
"BN=" vorgefunden worden. Dieser Parameter darf fiir Arbeitsdateien nicht 
benuizt werden. 


ERROR NUMBER: 154 
blockierend 


In dem Makrobefehl FLOP ist fur den Operanden "BN=" ein ungiltiger Wert 
gefunden worden. 


ERROR NUMBER; 155 
nicht-blockierend 


Fur eine Eingabe- oder Ausgabedatei, die nicht auf Band steht, ist der ' 
Operand "BN=P" vorgefunden worden. Der Operand wird ignoriert. 


ERROR NUMBER; 156 
blockierend 


Eine Arbeitsdatei, die vom Operanden "MT=8" im Makrobefeh! DVC als System- 
band definiert wurde, ist vom Operanden "PCs" explizit mit Paarigkeits- 
kontrofle (PC=Y) in derselben Lochkarte erklart worden. Dieser Fehler wird 

nur bei Verwendung des ETOS signalisiert. 
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ERROR NUMBER; 157 
blockierend 


In dem Makrobefehl FLOP ist der Operand “OZ=" fUr eine Datei angegeben 
worden, die nicht auf Platte steht. 


ERROR NUMBER; 158 
blockierend 


In dem Makrobefehl FLOP ist der Operand “OZ=" fur eine Arbeitsdatei 


auf Platte angegeben worden. 


ERROR NUMBER: 159 


blockierend oO 


In der Karte FLOP ist ein ungiltiger Wert fur den Operanden “OZ=" vorge- 
funden worden. 


ERROR NUMEER:; 160 
blockierend 


Eine Arbeitsdatei, die vom Operanden "MT=8" im Makrobefehl DVC als 
Systemband definiert wurde, wurde entweder explizit oder implizit im 
7-Spur-Modus angegeben. Dieser Fehler wird nur bei Verwendung des 
ETOS sigralisiert. 


ERROR NUMBER: 161] 
blockierend 


Der Wert des Operanden "KS=" in dem Makrobefehi FLOP hat ein ungil- 

tiges Format. Es gibt folgende Ursachen: Dezimalzahl gré@er 999, das Co) 
Zahlenfeld enthalt nicht-numerische Zeichen, das Zahlenfeld endet nicht 

mit einem Komma, einem Leerzeichen oder einem Nullenfeld (in diesem 

Falle darf der Operand in dem Makrobefehl FLOP nicht angegeben werden). 


ERROR NUMBER: 162 
blockierend 


In dem Befehl FLOP ist der Operand "KS=" fur eine Datei angegeben worden, 
die keine Eingabe- oder Ausgabedatei auf Platte ist. 


ERROR NUMBER; 163 
blockierend 


In dem Makrobefehl FLOP ist der Operand "CH="' fur eine Datei angegeben 
worden, die keine Eingabe- oder Ausgabedatei auf Platte ist. 


Oo 
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ERROR NUMBER: 164 


blockierend 


In dem Makrobefehl FLOP ist ein ungiiltiger Wert fir den Operanden "CH=" 


gefunden worden. 


ERROR NUMBER; 165 


blockierend 


In dem Makrobefehl FLOP ist durch den Operanden "KS=" die Verkettung 
mit der Overflow-Zone gefordert worden; es ist jedoch keine Overflow- 
Zone spezifiziert worden, die der Operand "OZ=" definiert. 


ERROR NUMBER: 166 


blockierend 


Der Operand "KS=" ist nicht erklart worden, wihrend eine verkettete 
Overflow-Zone vom Operanden "CH=" im Makrobefeh! FLOP angefordert 
wurde. 


ERROR NUMBER; 167 
blockierend 


In dem Makrobefehl FLOP ist der Operand "KS=" erklart worden, wihrend 
die Verkettung mit der Overflow-Zone durch den Operanden "CH=" aus- 
driicklich als nicht gefordert erklart worden ist. 


ERROR NUMBER: 168 
nicht-blockierend 


Der Operand "PM=" in dem Makrobefehi FLOP ist fr eine Datei benutzt 
worden, die keine Arbeitsdatei auf Band ist. 


ERROR NUMBER; 169 
blockierend 


Fir den Operanden "PM=" im Makrobefehl FLOP ist ein ungiltiger Wert 
gefunden worden. 


ERROR NUMBER: 170 
blockierend 


Der Operand "RL=" in dem Makrobefeh! FLD hat einen gréBeren Wert als 
der Operand BS=" in demselben Makrobefehl . 
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ERROR NUMBER; 171 
blockierend 


Fur eine Arbeitsdatei ist ein Makrobefehl FLD vorgefunden worden, 


ERROR NUMBER; 172 
blockierend 


Der Dateiname in dem Makrobefehl FLD ist nicht derselbe Dateiname, wie 
in den vorhergehenden Makrobefehlen DVC oder FLOP. 


ERROR NUMBER: 173 
lockierend 


com 


In dem Makrobefehl FLD ist der obligatorische Operand "BS=" nicht vorge- 
funden worden. 


ROR NUMBER: 174 
lockierend 


om 


Der Wert des obligatorischen Operanden "BS=" in dem Makrobefeh! FLD 
hat ein ungiltiges Format: Der Wert besteht aus mehr als 5 Stellen, ist 
gréBer als 32.767 (dezimal), enthalt nicht-numerische Zeichen oder endet 
nicht mit einem Komma. 


ERROR NUMBER: 175 
blockierend 


Es ist eine Kartendatei definiert worden, deren Blockgré®e 80 (dezimal) 


in dem Makrobefehl FLD uberschreiiet. 


ERROR NUMBER: 176 
blockierend 


Der Parameter “RT="in dem Makrobefehl FLD enthalt einen unleserlichen 


Wert. 


ERROR NUMBER: 177 
blockierend 


In dem Makrobefehl FLD ist ein Satz fester Linge gefordert worden, jedoch 
kann der obligatorische Operand "RL=" nicht gefunden werden. 
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ERROR NUMBER: 178 


In dem Makrobefehl FLD ist eine Satzart gefordert worden, die nicht von 
fester Linge oder ungebiockt auf Platte ist, wahrend der Operand “RL=" 
gefunden wurde. Diese Angaben sind nicht kompatibel. 


ERROR NUMBER: 179 
blockierend 


In dem Makrobefehl FLD ist fur den Operanden “RL=" ein ungultiger Wert 
gefunden worden. Dafur gibt es die folgenden Ursachen: Das Zahlenfeld 
besteht aus mehr als 5 dezimalen Stellen oder ist gréGer als 32767, es ent- 
halt ein nicht-numerisches Zeichen, wird nicht durch ein Komma oder ein 
Leerzeichen abgeschlossen, oder enthalt den Wert Null. 


ERROR NUMBER: 180 
blockierend 


In dem Makrobefehl FLD ist die Satzart "RT=V" oder "RT=U" gefordert 


worden und der obligatorische Operand "GL=" ist nicht gefunden worden, 


ERROR NUMBER; 1817 
blockierend 


In dem Makrobefehl FLD ist die Satzart "RT=F" gefordert worden oder es 
liegen ungeblockte Sttze auf Platte vor, wahrend der Operand "GL=" 
gefunden worden ist. Diese Angaben sind nicht kompatibel . 


ERROR NUMBER: 182 
blockierend 


FUr den Operanden "GL=" im Makrobefehl FLD ist ein ungUltiger Wert ge- 
funden worden. Dafur gibt es die folgenden Ursachen: Das numerische Feld 
ist gréBer als 5 dezimale Stellen oder 32767 (dezima!), es enthalt ein nichi- 
numerisches Zeichen, wird nicht von einem Leerzeichen oder einem Komma 
abgeschlossen, oder hat den Wert Null (dezimal). 


ERROR NUMBER: 183 
blockierend 


In dem Makrobefeh| FLD ist der obligatorische Operand "Li=" fir einen Satz 
nicht gefunden worden, der vorher durch "RT=F" oder “RT=U" als Satz 
variabler Lange oder als ungeblockter Satz auf Band definiert worden ist. 
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ERROR NUMBER: 184 
blockierend 


In dem Makrobefehl FLD ist der Operand "LL=" fur einen Satz gefunden 
worden, der vorher als Satz fester Lange oder als ungeblockt auf Platte 
definiert worden ist. Diese Angaben sind nicht kompatibel. 


ERROR NUMBER: 185 
blockierend 


Fur den Operanden “LL=" im Makrobefehl FLD ist ein ungiltiger Wert 

gefunden worden. Dafir gibt es die folgenden Ursachen: Das numerische 

Feld ist gréRer als 5 dezimale Stellen oder hat einen gréBeren Wert als 

32767 (dezimal), es endet nicht mit eimem Komma oder einem Leerzeichen, oO 
enthalt ein nicht-numerisches Zeichen oder hat den Wert Null (dezimal). 


ERROR NUMBER: 186 
blockterend 


Der im Makrobefehl FLD vom Operanden "LL=" definierte Wert ist nicht 
kleiner als der vom Operanden "GL=" definierte Wert, 


ERROR NUMBER: 187 
blockierend 


In dem Makrobefehl FLD ist der Operand "Lis" fiir eine Datei gefunden 
worden, die keine Ausgabedatei ist, 


ERROR NUMBER; 188 
blockierend 


Co 


Der Operand "LI=” im Makrobefehl FLD hat einen ungiltigen Wert. Dafur 
gibt es folgende Ursachen: Das numerische Feld besteht aus mehr als 4 
dezimalen Stellen, es enthilt ein nicht-numerisches Zeichen, es endet nicht 
mit einem Leerzeichen oder einem Komma, es hat den Wert Null (dezimal). 


ERROR NUMBER: 189 
blockierend 


In der Ausgabedatei ist der Wert "RELI" oder "LL=L!" kleiner als 20 fur 
eine Banddatei mit Blockzthlung oder fur eine Plattendatei. 


ERROR NUMBER: 190 
blockierend 


In der Ausgabedatei ist der Wert "RL=LI" oder "LL=LI" klefner als 15 fur 
eine Banddatei mit Blockzéhlung. oO 
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ERROR NUMBER: 191 
blockierend 


(n dem Makrobefeh| FLD ist der Operand "LD=" fir eine Datei gefunden 
worden, die keine Eingabedatei ist. 


ERROR NUMBER; 192 
blockierend 


Der Wert des Operanden "LD=" im Makrobefehl FLD ist ungu!tig. Dafur 
gibt es folgende Ursachen: Das numerische Feld besteht aus mehr als 4 
dezimalen Stellen, es enthalt ein nicht-numerisches Zeichen, es endet 
nicht mit einem Leerzeichen oder einem Komma, es hat den dezimalen 
Wert Null. 


ERROR NUMBER: 193 
blockierend 


Es sind zwei Makrobefehle OLAY benutzt worden. In dieser Kombination 
wurde die Ausgabedatei eine Arbeitscatei Uberlagern, die selbst die Ein- 
gabedatei tberlagert. Dieser Fall ist nicht zuldssig. 


ERROR NUMBER: 194 
blockierend 


Es ist mehr als ein Makrobefehl CFL gefunden worden. Nur der erste Mckro~ 
befehl CFL wird bericksichtigt. 


ERROR NUMBER: 195 
blockierend 


Im Makrobefehl FLD ist der Operand "SR=" fur eine Datei gefunden worden, 
die eine Plattendatei, eine Arbeitsdatei oder eine Ausgabedatei ist. . 


ERROR NUMBER: 196 
blockierend 


Der Operand "SR="" im Makrobefehl FLD hat einen ungultigen Wert. 


ERROR NUMBER: 197 
blockierend 


Ein Makrobefehl USE M ist flr ein Programm gefunden worden, das kein 
MERGE-Programm ist. 
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ERROR NUMBER: 198 
blockierend 


Im Makrobefehl FLD ist einer der Operanden "DE=", "DD=", "DL=" oder 
"DG=" fur eine Ausgabedatei gefunden worden. 


ERROR NUMBER; 199 
blockierend 


Ein Makrobefehl USE © ist fur ein Programm gefunden worden, das kein 
SORT-Programm ist. * 


ERROR NUMBER: 200 
blockierend 


tm Makrobefeh! FLD ist der Operand zum Léschen in einer scheinbar hexa- 
dezimalen Form dargestellt. Dagegen fehlt der Apostroph in der richtigen 
Position. 


ERROR NUMBER; 201 
blockierend 


Im Makrobefehl FLD ist der Operand "DG=X'FF/" gefunden worden, 


ERROR NUMBER: 202 
nicht-blockierend 


Der Wert des Lésch-Operanden im Makrobefehl FLD bedeutet, da fast 
alle Sutze geléscht werden wurden, Diese Meldung ist lediglich eine 
Warnung. 


ERROR NUMBER; 203 
blockierend 


Im Makrobefeh! FLD ist der Lésch-Operand "DL=X’00’" gefunden worden, 


ERROR NUMBER: 204 
blockierend 


Der Wert in einem der Operanden "DE=", "DD=", "DL=" oder "DG=" ist 
ein nichterkennbares Zeichen, Es gibt 63 annehmbare Zeichen, die Druck- 
zeichen mit Ausnahme des Apostroph, der hexadezimal ‘AF’ in diesem 
Operanden angegeben werden mu8. 
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ERROR NUMBER; 205 
blockierend 


tm Makrobefehl FLD ist der Léschoperand definiert worden, wahrend der 
obligatorisch zugeordnete Operand “CC=" nicht gefunden worden ist. 


ERROR NUMBER; 206 
blockierend 


Im Makrobefehl FLD ist der Operand "CC="" gefunden worden, wihrend kein 
Loschoperand vorher definiert worden ist. 


ERROR NUMBER: 207 
blockierend 


Im Makrobefehl FLD ist der Wert des Operanden “CC=" ungiltig. Dafiir gibt 
es folgende Ursachen: Das numerische Feld besteht aus mehr als 5 dezimalen 
Stellen oder ist gréRer als dezimal 32767, es enthalt ein nicht-numerisches 
Zeichen, es endet nicht mit einem Leerzeichen oder einem Komma, es hat 
den dezimalen Wert Null. 


ERROR NUMBER: 208 
blockierend 


Der Makrobefehl USE | ist erklart worden, wihrend keine Zusatzroutine 
fur die Eingabe, die durch SECT | signalisiert wird, gefunden worden ist. 


ERROR NUMBER: 209 
blockierend . 


Der Wert des Operanden "CC=" im Makrobefehl FLD ist gréfer als die 
Mindestsatzlange, die friuher im Makrobefeh! FLD durch einen der Operanden 
*RL=" oder "LL=" definiert wurde. 


ERROR NUMBER: 210 
blockierend 


Im Makrobefehl FLD ist der Operand "SF" fir eine Datei gefunden worden, 
die keine Eingabedatei auf Platte ist. 


ERROR NUMBER: 211 
blockierend 


Im Makrobefehl FLD ist fur den Operanden "SF=" ein nicht-erkennbarer 
Wert gefunden worden. 
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ERROR NUMBER: 212 
blockierend 


Eine Arbeitsdatei soll auf eine Datei tberlagert werden, die mit einem 
fruheren Makrobefehl OLAY in Uberlagerung mit einer Arbeitsdatei 


definiert worden ist. 


ERROR NUMBER: 213 
blockierend 


Der Makrobefehl CFL ist definiert worden, wahrend vorher keine Karten- 
datei erklart worden ist. 


ERROR NUMBER: 214 oO 
blockierend 


Es ist eine nicht-definierte Datei geschrieben worden, jedoch ist der dann obliga- 
torische Kennsatz NN7 im zusttzlichen Mokrobefehl USE fur die Eingabe nicht 
vorhanden. 

ERROR NUMBER: 215 

nicht-blockierend 


In dem zusdtzlichen Makrobefeh| USE fur die Eingabe ist der Kennsatz NN3 
benutzt und eine nicht-definierte Datei ist erklért worden. Der Kennsatz 
wird nicht bertcksichtigt. 


ERROR NUMBER; 216 
blockierend 


Im Makrobefeht CFL ist der obligatorische Operand "IC=" nicht gefunden *) 


worden. 


ERROR NUMBER: 217 
blockierend 


Im Makrobefehl CFL ist fir den Operanden "IC=" ein ungultiger Wert gefunden 
worden. Dafur gibt es folgende Ursachen: Das numerische Feld besteht aus 
mehr als 2 dezimalen Zeichen, oder hat einen Wert, der gréRer als dezimal 

80 ist, es enthalt ein nicht-numerisches Zeichen, es endet nicht mit einem 
Leerzeichen oder einen Komma, es hat den dezimalen Wert Null. 


ERROR NUMBER: 218 
blockierend 


Im Makrobefeh! CFL kann der obligatorische Operand "FC=" nicht gefunden 
werden, 


oO 
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ERROR NUMBER: 219 
blockierend 


Im Makrobefehl CFL ist der Wert des obligatorischen Operanden "FC=" 
ungultig. Dafur gibt es folgende Ursachen: Das numerische Feld besteht 
aus mehr als 2 dezimalen Stellen, oder hat einen Wert, der gréGer als 
dezimal 80 ist, es enthalt ein nicht-numerisches Zeichen, es endet nicht 
mit einem Komma oder einem Leerzeichen, es hat den dezimalen Wert 


Null. 


ERROR NUMBER; 220 
blockterend 


Im Makrobefehl CFL ist der Wert des obligatorischen Operanden "IC=" 
nicht kleiner als der West des Operanden "FC=", 


ERROR NUMBER; 221 
blockierend 


Im Makrobefehl CFL kann der obligatorische Operand "RL=" nicht gefunden 
werden, 


ERROR NUMBER; 222 
blockierend 


Im Makrobefehl CFL ist der Wert des obligatorischen Operanden "RL=" mit 
den Werten der friheren Operanden "IC=" und "FC=" nicht kompatibel. 
Der Wert des Operanden "RL=" mu8 ein Faktor des Wertes (FC - IC +1) 
sein, 


ERROR NUMBER: 223 
blockierend 


Der erste Dateiname im Makrobefehl OLAY ist vorher nicht erklart worden 
oder hat ein ungilltiges Format, FUr das ungUltige Format gibt es folgende 
Ursachen: Das Feld fur den Dateinamen besteht aus mehr als 6 Zeichen, es 
endet nicht mit einem Komma, es enthalt ein Zefchen, das von 0 ~ 9 oder 
von A - Z abweicht, es enthalt gar kein Zeichen. 


ERROR NUMBER: 224 
blockierend 


Der zweite Dateiname im Makrobefehl OLAY ist vorher nicht erklart worden 
oder hat ein ungultiges Format. Fur das ungultige Format gibt es folgende 
Ursachen: Das Feld fur den Datefnamen besteht aus mehr als 6 Zeichen, es 
endet nicht mit einem Leerzeichen, es enthalt ein Zeichen, das von 0 - 9 
oder A - Z abweicht, es enthalt gar kein Zeichen, 
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ERROR NUMBER; 225 
blockierend 


Beide Dateien im Makrobefehl OLAY sind Arbeitsdateien. 


ERROR NUMBER; 226 
biockierend 


Die Dateien im Makrobefehl OLAY sind nicht fiir denselben Datentrager 
definiert worden. 


ERROR NUMBER: 227 ° 
blockierend 


Der erste Dateiname des Befehls OVERLAY bezieht sich auf eine Datei, 
die nicht auf einem magnetischen Datentrager steht. 


ERROR NUMBER: 228 
blockierend 


Der zweite Dateiname des Befehls OVERLAY bezieht sich auf eine Datei, 
die auf einem nichtmagnetischen Datentrager steht. 


ERROR NUMBER; 229 
blockierend 


Die zwei Dateien des Makrobefehls OLAY sind nicht fur dieselbe Einheit 
definiert worden. 


ERROR NUMBER; 230 
blockierend 


Im entsprechenden Makrobefehl FLOP ist die erste Datei mit "LB=N" 
erklart worden. 


ERROR NUMBER: 231 
blockierend 


Im entsprechenden Makrobefehl FLOP ist die zweite Datei mit "LB=N" 
definiert worden, 


ERROR NUMBER; 232 


blockierend 


Die erste Datei im Makrobefehl OLAY arbeitet mit einem nicht-standard- 
maBigen Einstellmodus, 
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ERROR NUMBER: 233 
blockierend 


Die zweite Datei im Makrobefehl OLAY arbeitet mit einem nicht-standard- 
maBigen Einstellmodus. 


ERROR NUMBER: 234 
blockterend 


Es sind mehr als 16 Makrobefehle KEY gefunden worden. Es werden nur 
die ersten 16 Befehle beriicksichtigt. 


ERROR NUMBER: 235 
blockierend 


Der Schliisselname in dem Makrobefehl KEY ist ungultig. Daftir gibt es 
folgende Ursachen: Der Name besteht aus mehr als zwei Zeichen, er endet 
nicht mit einem Komma, er enthalt ein Zeichen, das nicht 0 - 9 oder A= Z 
lautet, das erste Zeichen ist kein Buchstabe oder das zweite Zeichen ist 
keine Zahl. 


ERROR NUMBER: 236 
blockierend 


Der Schlisselname des vorliegenden Makrobefehls KEY ist vorher schon 
benutzt worden. 


ERROR NUMBER: 237 
blockierend 


Im dem Makrobefehl KEY ist der obligatorische Operand "SK=" nicht ge- 
funden worden. 


ERROR NUMBER: 238 
blockierend 


Der Wert des obligatorischen Operanden "SK=" im Makrobefehl KEY: ist 
ungultig. Dafur gibt es folgende Ursachen: Das numerische Feld besteht 
aus mehr als 5 dezimalen Zeichen oder ist groBer als 32767, es endet nicht 


mit einem Komma, es enthalt ein nicht-numerisches Zeichen oder hat den 
Wert Null. 


ERROR NUMBER: 239 
blockierend 


In dem Makrobefehl KEY ist keiner der obligatorischen Operanden "EK=" 
oder "KL=" gefunden worden, 
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ERROR NUMBER: 240 
blockierend 


In dem Makrobefeh! KEY ist der Wert des Operanden "EK=" kleiner als der 
Wert des Operanden "SK=", 


ERROR NUMBER; 241 
blockierend 


Der Wert der Schlissellange, der aus den beiden Operanden "SK="" und "EK=" 
im Makrobefehl KEY berechnet wird, ist gréBer als 256. 


ERROR NUMBER: 242 
blockierend oO 


Der Wert des Operanden "KL=" im Makrobefehl KEY ist ungultig. Dafur 
gibt es folgende Ursachen: Das numerische Feld besteht aus mehr als 3 
dezimalen Stellen oder hat einen Wert, der gréGBer als dezimal 256 ist, 
es endet nicht mit einem Komma oder einem Leerzeichen, es enthalt ein 
nicht-numerisches Zeichen oder hat den Wert Null. 


ERROR NUMBER: 243 
blockierend 


Das vorliegende Schlisselfeld (das durch die Operanden "SK="" und "EK=" 
oder "KL=" definiert wird) uberlagert ein vorhergehendes Schliisselfeld. 


ERROR NUMBER: 244 
blockierend 


Die Einheitennummer MT=8 ist mehr als einmal von einer Arbeitsdatei auf oO 
Band benutzt worden. 


ERROR NUMBER; 245 
blockierend 


Im Makrobefehl KEY ist ein nicht-erkennbarer Wert flr den Operanden 
*SM=" gefunden worden. 


ERROR NUMBER: 246 
blockferend 


tm Makrobefehl KEY ist ein nichterkennbarer Wert fur den Operanden 
“KT=" gefunden worden. 
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ERROR NUMBER: 247 
blockierend 


Der Makrobefehl SECT © ist gefunden worden, wihrend vorher kein Makro- 
befehl USE O gefunden worden ist. 


ERROR NUMBER: 248 
blockierend 


Es ist mehr als eine BefehIskarte (entweder der Makrobefehl SORT oder 
MERGE) gefunden worden, Es wird nur der erste Befehl beriicksichtigt. 


ERROR NUMBER: 249 
biockierend 


In einem MERGE-Programm sind einer oder mehrere Makrobefehie OLAY 
gefunden worden, In diesem Falle sind keine Uberlagerungen zulissig. 


ERROR NUMBER: 250 
blockierend 


In einem Makrobefeh! FLOP ist der Operand "KS=" definiert und ein SORT- 
Programm ist angefordert worden. 


ERROR NUMBER; 251 
blockierend 


Durch den Operanden "CA=Y" in einem friheren Makrobefeh! FLOP ist die 
Verkettung mit der Overflow-Zone in einer Plattendatei fur ein SORT- 
Programm gefordert worden, 


ERROR NUMBER: 252 
blockierend 


In der Befehlskarte stehen keine Schltissel, obwohl ein oder mehrere 
Makrobefehle KEY fruher erklart worden sind. 


ERROR NUMBER: 253 
blockierend 


!n der Befehlskarte ist ein Schlusselname gefunden worden, der nicht in 
einem Makrobefeh! KEY erklart worden ist. 
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ERROR NUMBER; 254 
blockierend 


In der Befeh!skarte sind mehr Schlusselcode gefunden worden, als von dem 
Makrobefehl KEY erklart worden sind. 


ERROR NUMBER: 255 
nichi-blockierend 


In der Befehlskarte sind weniger Schlusselcode gefunden worden, als durch 
den Makrobefehl KEY definiert worden ist. Die Namenfolge in der Befehls~ 
karte wird als definitiv angesehen. 


ERROR NUMBER: 256 
blockierend 


In der Befehlskarte ist ein SchliisseIname wiederholt worden. 


ERROR NUMBER: 257 
blockierend 


In Spalte 25 des Makrobefehls USE ist ein unbekannter Routinename gefunden 
worden. Diese Namen kénnen nur O, [oder M lauten. 


ERROR NUMBER: 258 
bleckierend 


In einem Kartenstapel sind beide Makrobefehle “USE O" und "USE M" 
gefunden worden. 


ERROR NUMBER: 259 
blockierend 


Es ist mehr als ein Makrobefehl USE I gefunden worden. 


ERROR NUMBER: 260 
blockierend 


Wenn ein Makrobefeh! OLAY benutzt worden ist, um die Ausgabedatei auf 
die Eingabedatei zu Uberlagern, und wenn die Eingabedatei auf derse!ben 
Einheit wie die Arbeitsdatei avfgelegt ist, wird dieser Fehler signalisiert. 
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ERROR NUMBER; 261 
blockierend 


In einem SORT-Programm mit Arbeitsdateien auf Platte ist die Mehrfach- 
eingabe nicht zulussig. 


ERROR NUMBER; 262 
blockierend 


Einer der Namen fir die Kennstitze in den zusttzlichen Makrobefehlen USE 
fir die Eingabe oder Ausgabe ist falsch (mit Ausnahme des ersten Namens). 


ERROR NUMBER: 263 
nicht-blockierend 


In dem zusdizlichen Makrobefehl USE fur die Eingabe oder Ausgabe ist ein 
Kennsatzname wiederholt worden. 


ERROR NUMBER: 264 
blockierend 


Der Makrobefehl SECT | ist vorhanden, wahrend kein Makrobefehl USE | 
vorher gefunden worden ist. 


ERROR NUMBER: 265 
blockierend 


Die Kombination der Dateien in dem Makrobefehl OLAY ist unzulissig . 
Es gibt nur die drei folgenden Arten: 


a) Eine Arbeitsdatei uberlagert die Eingabedatei 
b) Die Ausgabedatei uberlagert eine Arbeitsdatei 
c) Die Ausgabedatei uberlagert die Eingabedatei. 


Die Arien a) und b) kénnen auch zusammen benutzt werden. Wenn c) 
benutzt wird, darf kein weiterer Makrobefeh] OLAY angegeben werden. 


ERROR NUMBER: 266 
blockierend 


Der Makrobefehl SECT M ist gefunden worden, wahrend kein Makrobefehl 
USE M vorher gefunden worden ist. 
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ERROR NUMBER: 267 


blockierend 


Der vorliegende Makrobefehl OLAY beschreibt eine Arbeitsdatei, die die 
Eingabedatei tberlagert, wahrend diese Kombination vorher schon benutzt 
worden ist. In einem SORT-Programm ist nur eine Eingabedatei zuldssig und 
fur ein MERG-Programm kénnen keine Makrobefehle OLAY angegeben 


werden. 


ERROR NUMBER: 268 
blockierend 


Der vorliegende Makrobefeh! OLAY definiert die Ausgabedatei in Uber- 
lagerung mit einer Arbeitsdatei. Diese Kombination ist in einem fruheren 
Makrobefehl OLAY schon benvtzt worden. 


ERROR NUMBER: 269 
blockierend 


Spalte 25 des Makrobefehls SECT enthialt ein ungiltiges Zeichen, 


ERROR NUMBER: 270 
blockierend 


Es sind mehrere Eréffnungsroutinen gefunden worden (Makrobefeh! SECT H). 


ERROR NUMBER: 271 
blockierend 


Es sind mehrere Eingaberoutinen gefunden worden (Makrobefehl SECT 1). 


ERROR NUMBER: 272 
blockierend 


Mehrfache Verwendung der Ausgaberoutine (SECT ©) oder der Mischroutine 
(SECT M) ist festgestellt worden, 


ERROR NUMBER: 273 
blockierend 


Der vorliegende Makrobefehl OLAY beschreibt die Ausgabedate! in Uber- 
lagerung mit der Eingabedatei, wahrend frithere Makrabefehle OLAY schon 
benutzt worden sind, 
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ERROR NUMBER: 274 
blockierend 


Eine Eingabedatei ist mit ungeblockten Satzen beschrieben worden und eine 
Kartendatei ist vorhanden. Diese Kombination ist in einem SORT=Programm 
unzuldssig. 


ERROR NUMBER: 275 
blockierend 


Die Endadresse des Schlissels (definiert durch die Operanden "EK=" oder 
"SK=" und "KL=" im Makrobefehl KEY) ist gréBer als die Mindestsatzlinge, 
die von den Operanden "RL=" oder "LL=" im Makrobefehl FLD definiert 


wird, 


ERROR NUMBER: 276 
blockierend 


Das Operandenfeld eines Befehls ORG enthilt einen symbolischen Namen, 
Es sind nur die folgenden Angaben zulassig: R, * + Dezimalzahl, 
* = Dezimalzahl oder eine absolute Adresse. 


ERROR NUMBER: 277 
blockierend 


Ein Befehl in der Benutzerroutine ist falsch, Entweder wurde der Befehl 
nicht in der APS-Sprache kodiert oder DC, DS oder DP haben nicht das 
erforderliche Format. 


ERROR NUMBER: 278 
blockierend 


Eine Karte .APS ist gefunden worden. Wahrscheinlich ist der Makrobefehl 
END ausgelassen worden. 


ERROR NUMBER: 279 
nicht-blockierend 


Die Spalten 22 bis 24 eines SPG-Makrobefehls enthalten keine Leerzeichen. 
Kein Makrobefehl ist linger als 4 Zeichen. 


ERROR NUMBER: 280 
blockierend 


Es liegen mehrere Vergleichsroutinen vor (Makrobefeh! SECT C). 
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ERROR NUMBER; 2817 
blockierend 


Die Vergleichsroutine ist vorhanden (Makrobefehl SECT C), wihrend der 
Schlussel durch einen oder mehrere Makrobefehle KEY friuher erklart 
worden sind. 


ERROR NUMBER: 282 
blockierend 


Der erste Operand in dem Makrobefehl STRT, der die Startadresse darstellt, 
hat eine ungiltige Form. Dieser Fehler tritt auf, wenn das Zahlenfeld nicht 
numerisch ist, gréBer als 32767 (dezimal) ist, den Wert Null hat, mit Vor- 
zeichen versehen ist, mehr Stellen als zuldssig enthalt oder nicht mit einem 
Komma oder einem Leerzeichen endet. 


ERROR NUMBER: 283 
blockierend 


Der RHS eines Operanden endet nicht mit einem Komma oder einem Leer- 
zeichen, was weitere Fehler nach-sich ziehen kann. 


ERROR NUMBER; 284 
blockierend 


Der Dateiname in dem Makrobefehl FLOP hat ein ungultiges Format, Dafur 
gibt es folgende Ursachen: Der Name besteht aus mehr als 6 Zeichen, das 
erste Zeichen ist eine Zahl, der Name enthalt ein Zeichen, das nicht 

O bis 9 oder A bis Z lautet, er beginnt mit einem Y, die ersten beiden 
Zeichen sind gleich, er endet nicht mit einem Komma. 


ERROR NUMBER: 285 
blockierend 


In einer Befehlskarte ist ein Schliésselname gefunden worden, wahrend 
vorher keine Makrobefehle KEY erklart worden sind. 


ERROR NUMBER: 286 
blockierend 


Der Dateiname in dem Makrobefehl FLD hat ein ungiltiges Format. Daft 
gibt es folgende Ursachen: Der Name besteht aus mehr als 6 Zeichen, er 

endet nicht mit einem Komma, er enthalt andere Zeichen als 0 bis 9 oder 
A bis Z, das erste Zeichen ist eine Zahl oder Y, die ersten zwei Zeichen 
sind gleich, 
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ERROR NUMBER: 287 
blockierend 


Einer der Schlisselnamen in der Befehlskarte ist falsch. Dafur gibt es 
folgende Ursachen: Der Name besteht aus mehr als 2 Zeichen, er endet 
nicht mit einem Leerzeichen oder einem Komma, er beginnt mit einem 
Y oder einer Zahl, die ersten zwei Zeichen sind gleich. 


ERROR NUMBER; 288 
blockierend 


Dieser Fehler wird signalisiert, wenn ein Makrobefeh! OLAY benutzt 
worden ist, um die Ausgabedatei der Eingabedatei zu uberlagern und wenn 
festgestellt worden ist, da die Ausgabedatei auf derselben Einheit wie die 
Arbeitsdatei aufgelegt worden ist. Diese Aussage bezieht sich auf SORT- 
Programme mit Bandeinheiten, 


ERROR NUMBER; 289 
blockierend 


Der numerische Wert des Operanden "BS=""_und der Makrobefehl FLD enden 
mit einem Komma, das das Ende der Lochkarte darstellt. Es missen jedoch 
weitere obligatorische Operanden folgen. 


ERROR NUMBER: 290 
blockierend 


Der Wert des obligatorischen Operanden "RL="_in dem Makrobefehl CFL 

ist ungiltig. Dafir gibt es folgende Ursachen: Dos numerische Feld besteht 
aus mehr als 2 dezimalen Stellen, es enthalt ein nicht-numerisches Zeichen, 
es endet nicht mit einem Leerzeichen oder hat den dezimalen Wert Null. 


ERROR NUMBER: 291 
blockierend 


Die zwei Namen in der Karte OLAY sind gleichlautend. 


ERROR NUMBER: 292 
blockierend 


Es sind keine Schliisse! erklart worden und es ist keine Vergleichsroutine, die 
von SECT C signalisiert wird, gefunden worden. 
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ERROR NUMBER: 293 
blockierend 


Der Wert des Operanden “EK=" im Makrobefehl KEY ist ungUltig. Dafur gibt 

es folgende Ursachen: Das numerische Feld besteht aus mehr als 3 dezimalen 
Stellen, es endet nicht mit einem Leerzeichen oder einem Komma, das Feld ent- 
halt ein nicht-numerisches Zeichen oder hat den Wert Null bzw. der be- 
rechnete Schlussel ist gréBer als dezimal 256. 


ERROR NUMBER: 294 
blockierend 


Eine nicht-standardméBige Eingabedatei, die vom Operanden "LB=N" im 
Mokrobefehl FLOP definiert wurde, ist gefunden worden, wahrend keine oO 
zustitzliche Eréffnungsroutine, die von SECT H signalisiert wird, vorgefunden 

wurde, 


ERROR NUMBER: 295 
blockierend 


Der Name des ersten Kennsatzes in dem zustitzlichen Makrobefeh! USE fur 
die Eingabe oder Ausgabe ist falsch oder fehlt, 


ERROR NUMBER: 296 
nicht-blockierend 


In einer "Fortsetzungskarte" fur den Makrobefehl FLD enthalten die Spalten 
18 bis 24 keine Leerzeichen. Dieser Fall kann vorliegen, wenn die Fort- 
setzungskarte nicht an der richtigen Stelle im Kartenstapel liegt. 


ERROR NUMBER: 297 oO 
blockierend 


Ein Satz, der fruher als Satz variabler Linge definiert wurde, hat eine max. 
Linge von mehr als 1023 wie vom Operanden "GL=" im Makrobefehl FLD 
definiert wurde. 


ERROR NUMBER: 298 
blockierend 


Fur einen Satz variabler Lange ist der Wert des Operanden "LL=" in der 
Karte FLD gréfer als dezimal 1023. 
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ERROR NUMBER: 299 
blockierend 


Die Eingaberoutine des Benutzers, die vom Makrobefehl SECT I signalisiert 
wird, liegt Fur ein Programm vor, das kein SORT~Programm ist. 


ERROR NUMBER: 300 
blockierend 


Die Mischroutine des Benutzers, die von dem Makrobefeh! SECT M signali- 
siert wird, liegt fur ein Programm vor, das kein MERGE-Programm ist. 


ERROR NUMBER: 301 
blockierend 


In einer Subroutine des Benutzers ist eine Karte gefunden worden, die in 
Spalte 18 ein Stermchen und in Spalte 19 kein Leerzeichen enthilt. 

Der Anruf der BIOS-Subroutine scheint vorzuliegen, der in 

diesem Format nicht erlaubt ist. 


ERROR NUMBER; 302 
blockierend 


Einer der 20 unzuldssigen Anrufe fiir Makrobefehle in der APS-Sprache ist 
in einer Subroutine des Benutzers vorgefunden worden. 


ERROR NUMBER: 303 
blockierend 


Der Name der Subroutine, die mit dem Makrobefeh! SUB angerufen wird, 
beginnt nicht mit einem Y, besteht aus mehr als 6 Zeichen, enthalt nur das 
Zeichen Y, endet nicht mit einem Leerzeichen oder enthalt ein Zeichen, 


das nicht 0 - 9 oder A - Z lautet. 


ERROR NUMBER: 304 
blockierend 


Der Wert, der von dem Operanden “AT=" in einem Makrobefehl DVC fur 
ein Eingabeband definiert wird, lautet so, da8 die Einheitennummer der 
Wechselstation dieselbe ist, wie die Einheitennummer fur das vorhergehende 
Eingabeband oder ihre Einheitennummer der Wechselstation in einem 
MERGE-Programm. 
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ERROR NUMBER; 305 
blockierend : 


Mehr als 40 verschiedene Subroutinen sind von den Benutzerroutinen 
angerufen worden, 


ERROR NUMBER: 306 
blockierend 


Die berechnete Lange der vorliegenden Subroutine des Benutzers Uberschreitet 
dezimal 32767. Dieser Fehler wird nach jeder Karte signalisiert, bis ein 
Makrobefehl SECT oder END gefunden wird. 


ERROR NUMBER: 307 
blockierend 


Eine Plattendatei (DV=D5) ist definiert worden, wthrend im ETOS gearbeitet 
wird, 


ERROR NUMBER: 308 
nicht-blockierend 


Der Kennsatz "NN7" ist in einem Makrobefehl USE | gefunden worden, 
wuhrend keine nicht-definierte Datei erklart worden ist. Der Kennsatz 
wird nicht beriicksichtigt. 


ERROR NUMBER: 309 
blockierend 


Die erste Karte, die auf den Makrobefehl EAPS oder auf den Makrobefeht 
ESCT folgt, enthilt nicht den Makrobefeh! SECT. 


ERROR NUMBER: 310 
blockierend 


Eine Eingabe- oder Ausgabedatei ist auf derselben Einheit wie das System- 
band (MT = 8) spezifiziert worden. Dieser Fehler wird nur bei Verwendung 
des ETOS signalisiert. 


ERROR NUMBER: 311 


blockierend 


Die Einheitennummer der vorliegenden Datei ist fruher als "MT = 8" 
definiert worden (d.h. das Systemband wird als Arbeitsband benutzt). 
Der Einstellmodus ist nicht als "PM=P" definiert worden. Dieser Fehler 
wird nur bei Verwendung des ETOS signalisiert. 
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ERROR NUMBER; 312 
blockierend 


In der vorliegenden Benutzerroutine ist der Befehl ORG in der Form 
"ORG *+ Dezimalzah|" gefunden worden.Die resultierende Adresse liegt 
auferhalb der Grenzen der Subroutine. 


ERROR NUMBER: 313 
blockierend 


Die Eréffnungsroutine des.Benutzers, die durch den Makrobefehl SECT H 
signalisiert wird, ist vorhanden, obwohl die Eingabedatei keinen nicht~ 
standardmaBigen Kennsatz hat. 


o ERROR NUMBER: 314 
blockierend 


Wahrend der Liingenberechnung, durch die den Makrobefehl SUB ange- 
rufenen Subroutinen sind weitere angerufenen Subroutinen vorgefunden 
worden. Die Summe der Subroutinen ist jetzt gréGer als 40. 


ERROR NUMBER: 315 
blockierend 


Auf dem Systemband oder auf der Systemplatte kann eine vom Makrobefehl 
SUB angerufene Subroutine nicht gefunden werden. Dieser Fehler wird fiir 
jede nicht-identifizierte Subroutine wiederholt. 


ERROR NUMBER: 316 
blockierend 


Auf dem Systemband kann der .APS-Compiler nicht gefunden werden. Er 
wird fir die Langenberechnung der Subroutinen bendtigt, die von den 
Benutzersubroutine angerufen werden. Dieser Fehler wird nur bei Verwen~ 
dung des ETOS signalisiert. 


ERROR NUMBER; 317 
blockierend 


Dieser Fehler wird signalisiert, wenn das Ende eines Makrobefehls erreicht 
worden ist und unbekannte Operanden vorgefunden wurden. Dieser Fehler 
wird oft hervorgerufen: von Operanden, die nicht in der richtigen Reihen- 
folge in den Lochkarten stehen, durch falsches Stanzen wahlfreier Operan- 
den oder vom letzten Operanden, der nicht mit einem Leerzeichen endet. 


Oo 
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ERROR NUMBER: 318 
blockierend 


Die Summe der Lange einer Benutzerroutine und ihrer angerufenen Sub- 
routinen tberschreitet dezimal 32767. 


ERROR NUMBER: 319 
blockierend 


Die Summe der Linge der Subroutinen, die von mehr als einer Benutzer- 
routine angerufen wurden, Uberschreitet dezimal 32767. 


ERROR NUMBER: 320 
blockierend 


Ein Schlussel, der nicht alphanumerisch ist (z.B. "KT=2" oder "KT=3" im 
Makrobefeh! KEY), ist mit einer Lange, die gréfer als 16 Bytes ist, definiert 
worden. 


ERROR NUMBER; 321 
blockierend 


Es ist kein Makrobefehl SORT oder MERG gefunden worden, 


ERROR NUMBER: 322 
blockierend 


Fur ein Sortierprogramm sind weniger als 3 Arbeitsdateien definiert worden. 


ERROR NUMBER: 323 
blockierend 


Fur ein Sortierprogramm sind mehr als 10 Arbeitsdateien erklart worden, 


ERROR NUMBER: 324 
blockierend 


Fur ein SORT-Programm ist keine Eingabedatei definiert worden, 


ERROR NUMBER: 325 
blockierend 


Fur ein Sortierprogramm sind mehr als eine Eingabedatei auf einem Magnet- 
datentrager erklart worden. 
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ERROR NUMBER: 326 
blockierend 


Mit efner Bandeingabe ist eine nicht~definierte Eingabedatei erklaért worden. 
Diese Kombination wird nicht angenommen, 


£RROR NUMBER: 327 
blockierend 


Mit einer Eingabedatei auf Band und einer Kartendatei ist eine nicht-definierte 
Eingabedatei erk{art worden. Diese Kombination wird nicht angenommen, 


ERROR NUMBER: 328 
blockierend 


Fur ein MERGE-Programm ist eine nicht-definierte Datei erklért worden. 


ERROR NUMBER: 329 
blockierend 


Fur ein MERGE-Programm sind keine Eingabedateien erklirt worden. 


ERROR NUMBER; 330 
blockierend 


Fur eine Eingabedatet auf einem MERGE-Programm ist ein nicht-standardmaBiger 
Kennsatz definiert worden. 


ERROR NUMBER; 331 
blockierend 


Fur ein MERGE~Programm sind Arbeitsdateien definiert worden. 


ERROR NUMBER; 332 
blockierend 


Der Makrobefehl USE © ist erklért worden, wahrend keine zustitzliche 
Ausgaberoutine des Benutzers (signalisiert durch SECT O) erklart worden 
ist. 


ERROR NUMBER: 333 
blockierend 


Die zusttzliche Eréffnungsroutine des Benutzers, die in einem friheren 
Makrobefehl FLOP beschrieben worden ist, hat denselben Namen als 
Dateinamen, 
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ERROR NUMBER: 334 
blockierend 


Der Makrobefeh! USE M ist erklart worden, wahrend keine zustitzliche 
Mischroutine (signalisiert durch SECT M) gefunden worden ist. 


ERROR NUMBER: 335 
blockierend 


Fur ein Programm, das kein SORT~Programm ist, ist die zusttzliche Eingabe~ 
routine des Benutzers von SECT | eingegeben worden, 


ERROR NUMBER: 336 
nicht-blockierend *) 


Die zwei Arbeitsdateien auf Platten haben nicht denselben Schreibmodus. .In 
diesem Falle werden beide Platten auf den 8-Bit-Modus eingestellt. 


ERROR NUMBER: 337 
blockierend 


In den Eingabedateien fur ein MERGE-Programm sind verschiedene Satzarten 
erklart worden, 


ERROR NUMBER: 338 
blockierend 


Fur ein MERGE-Programm sind mehr als 10 Eingabedateien auf einem 
magnetischen Datentriger erklart worden. 


ERROR NUMBER: 339 oO 
blockierend 


Das Eingabeband ist als 7-Spur-Band erklart worden und ein gepackter und 
mit Vorzeichen versehener Schlussel (von KT=3 im Makrobefehl KEY) ist 
gefunden worden, 


ERROR NUMBER: 340 
blockierend 


Das Ausgabeband ist als 7-Spur-Band erklart worden und ein gepackter und 


mit Vorzeichen versehener Schlussel (definiert vom Operanden "KT=3" im 
Makrobefehi KEY) ist gefunden worden, 
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ERROR NUMBER: 341 


blockierend 


Zwei Arbeitsdateien auf Band ist die gleiche Einheitennummer zugeordnet 
worden. 


ERROR NUMBER: 342 
blockierend 


Die Option "Wiederanlauf" ist gefordert worden und eine oder mehrere 
Arbeitsbinder sind als 7-Spur—Bunder erklart worden. Diese Kombination 
ist nicht zuldssig. 


ERROR NUMBER: 343 
nicht-blockierend 


Eine Mehrfachdatei oder eine Datei mit Wechselstationen ist erklart worden, 
wihrend das erneute Starten ausgeschlossen worden ist. 


ERROR NUMBER: 344 
blockierend 


Der Wert von "RL=LD" oder "LL=LD" fiir die vorliegende Eingabedatei ist 
kleiner als 20 fur eine Datei ohne Blockzthlung. Dieser Fai! ist eine APS- 
Einschrankung. 


ERROR NUMBER: 345 
blockierend 


Mindestens eins der Arbeitsbander ist als 7-Spur-Band definiert worden, und 
ein gepackter und mit Vorzeichen versehener Schlussel, der vom Operanden 
"KT=3" im Makrobefehl KEY definiert wurde, ist gefunden worden, Dieses 
Format kann auf einem 7-Spur-Band nicht dargestellt werden, 


ERROR NUMBER: 346 
blockierend 


Eine Etngabedate? ist auf derselben Einheit definiert worden, wie eine 
weitere Eingabedatei in einem MERGE-Programm. 


ERROR NUMBER: 347 
blockierend 


Die Ausgabedatei ist auf derselben Einheit definiert worden, wie eine 
Eingabedatei in einem MERGE-Programm. 
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ERROR NUMBER: 348 
blockierend 


Es sind mehr als eine Ausgabedatei erklart worden. 


ERROR NUMBER; 349 
blockierend 


Ein Schlussel ist gepackt und mit Vorzeichen erklart worden ("KT=3" im 
Makrobefeht KEY), wihrend fruher schon eine Kartendatei erklart worden 
ist, Dieses Schlisselformat kann nicht in einer Lochkarte dargestellt werden 
und ist daher nicht zulussig. 


ERROR NUMBER: 350 < ) 
blockierend 


Der Befehl ORG, der eine absolute Adresse im Operandenfeld enthilt, Uber- 
tragt die Adresse in eine Zone, die vom generierten Programm benutzt wird. 


ERROR NUMBER: 351 
blockierend 


Im Kernspeicher gibt es zwei migliche Arbeitszonen, die von der Start= 
adresse im Makrobefehl STRT und dem Operanden "CS=" im Makrobefehl 
OBJP bestimmt werden, 

Diese Zonen kénnen z.B. mit einem Namen von einer Subroutine des Be- 
nuizers definiert werden. Auf beide Zonen kann mit einem Befeh! ORG 
Bezug genommen werden, wahrend von der Subroutine auf jede Zone nur 
einmal verwiesen werden kann. Diese Regel ist nicht eingehalten worden. 


ERROR NUMBER; 352 
blockierend : e) 


Erfolgt ein Sprung durch den Befehl ORG auf eine absolute Adresse, so sind 
nur zwei Arten von APS~Befehlen zuldssig: DS-Befehle und ein Befehl RORG, 
mit dem die AdreBkontrolle in die Subroutine des Benutzers Ubertragen wird, 
Entweder ist ein APS-Befehl, der diesen Regeln nicht entspricht, vorgefunden 
worden oder der DS-Befehl hat ein unzultissiges Format. 


ERROR NUMBER; 353 
blockierend 


Die Felder, die von den Befehlen DS in einer der zwei mégtichen freien 

Arbeitszonen definiert werden, sind gréGer als die Arbeitszonen, wodurch 
ein Overflow in der fUr das generierte Programm reservierten Zone erfolgt 
ist, oder die definierten Felder sind gréGer als die Kernspeicherkapozitit . 
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ERROR NUMBER: 354 
nicht-blockierend 


Der Wert der Wechselstation fur die Eingabedatei fur ein SORT~Programm 
(in dem Makrobefehl DVC definiert) bezieht sich auf dieselbe Einheit, wie 
eine Arbeitsdatei, Dieser Wert mu mit einer Karte LBC getindert werden. 


ERROR NUMBER; 355 


nicht benutzt 


ERROR NUMBER: 356 
nicht-blockterend 


Die Wechselstation der Ausgabedatei (definiert vom Operanden “AT=" im 
Makrobefehl DVC) bezieht sich auf dieselbe Einheit, wie ein Arbeitsband 
fur ein SORT-Programm. 


ERROR NUMBER: 357 
blockierend 


Auf den Makrobefehl END am Ende der Zusatzroutine des Benutzers ist im 
Kartenleser keine Karte KEND gefunden worden. 


ERROR NUMBER: 358 
blockierend 


Fur das SORT-Programm ist erneutes Starten explizit oder implizit bzw. 
durch eine Mehrfacheingabe auf ein SORT-Programm gefordert worden, 
wihrend gleichzeitig ein nicht-standardmiBiger Einstellungsmodus fir 
mindestens ein Arbeitshand gefordert wurde. 


ERROR NUMBER: 359 
blockierend 


Fur ein SORT-Programm ist die Satzart der Eingabedatei nicht die gleiche, wie 
die Satzart der Ausgabedatei. 


ERROR NUMBER: 360 
blockierend 


In einem SORT-Programm mit Satzen fester Lange sowohl fur die Eingabe- 
als auch Ausgabedateien ist die Summe der Satzlange minus der Lingenab- 
nahme in der Eingabedatei nicht gleich der Summe der Saizliinge minus 
der Langenzunahme in der Ausgabedatei. 
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ERROR NUMBER: 361 
blockierend 


Die Eingabe~ und Ausgabedateien fiir ein MERGE-Programm haben nicht 
die gleichen Satzarten, 


ERROR NUMBER: 362 
blockierend 


Der Wert der Summe (Satzliinge minus Langenzunahme) fur die Ausgabedatei 
ist nicht gleich der Summe (Satzlange minus Langenabnahme) fur eine Ein- 
gabedatei auf ein MERGE-Programm. Diese Aussage bezieht sich nur auf 
Satze fester Lange, Der Fehler wird sooft signalisiert, wie Ungleichheit 
festgestellt wird. 


ERROR NUMBER: 363 
blockierend 


Fur ein SORT-Programm ist eine nicht-definierte Eingabedatei erklart 
worden, wahrend keine von SECT J signalisierte Zusatzroutine des Benutzers 
gefunden worden ist. 


ERROR NUMBER: 364 
blockierend 


Fur ein SORT-Programm ist eine nicht-definierte Eingabedatei erklért 
worden, wahrend keine vom Makrobefehl USE I definterte zustitzliche 
Verkettung gefunden worden sind. 


ERROR NUMBER: 365 ~ 
blockierend 


Spalte 5 der Anrufkarte .SPG im EDOS mu8 ein Komma enthalten, um auf 
das Vorhandensein beider obligatorischer Operanden zu verweisen. Diese 
Regel ist nicht eingehalten worden. Dieser Fehler wird nur bei Verwendung 
des EDOS signalisiert. 


ERROR NUMBER: 366 
blockierend 


Eine nicht-definierte Datei, eine Plattendatei und eine Kartendatei sind 


als Eingabedateien fUr ein SORT-Programm definiert worden, Diese Kombi- 
nation ist nicht zulassig. 
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ERROR NUMBER; 367 
blockierend 5 


Fur den Operanden "OD=" in der Anrufkarte .SPG ist ein ungiiltiger Wert 
gefunden worden. Es gibt die folgenden gultigen Werte: 0-9, A -F, 
SD oder WD. Dieser Fehler wird bei Verwendung des EDOS signalisiert. 


ERROR NUMBER: 368 
blockierend 


In der Anrutkarte .SPG endet der Operand "AS" nicht mit einem Komma oder 
einem Leerzeichen. Dieser Fehler wird nur bei Verwendung des EDOS 
signalisiert. 


ERROR NUMBER; 369 
nicht-blockierend 


In der Anrufkarte .SPG ist der Operand "RM=" gefunden worden, wahrend 
der Hinweis fehit, da die Makrobefehle auf der Systemplatte gespeichert 
sind (z.B, fehlt der Operand "MS, "), Dieser Fehler wird nur bei Verwen- 
dung des EDOS signalisiert. Es wird angenommen, da die Parameter in 
Lochkarten stehen. 


ERROR NUMBER: 370 
blockierend 


Auf den Makrobefehl END ist keine Karte BEND im Kartenleser gefunden 
worden, wahrend keine weiteren zusdtzlichen Routinen des Benutzers 
vorliegen. 


ERROR NUMBER: 371 
blockierend 


In einer Zusatzroutine des Benutzers ist die Subroutine YCKP? gefunden 
worden, Diese Subroutine ist eine der 5 unzuldssigen Subroutinen. 


ERROR NUMBER: 372 
blockierend 


In einer Zusatzroutine des Benutzers ist die Subroutine YCLOSS gefunden 
worden, Diese Subroutine ist eine der 5 unzultssigen Subroutinen, 


ERROR NUMBER: 373 
blockierend 


In einer Zusatzroutine des Benutzers ist die Subroutine YOPN gefunden 
worden. Diese Subroutine ist eine der 5 unzultissigen Subroutinen, 
a 
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ERROR NUMBER: 374 
nicht-blockierend 


Das Anfangsfeld, definiert vom Operanden “SR=" im Makrobefehi FLD, hat 
einen Wert von 80 oder mehr fur eine Kartendatei, 


ERROR NUMBER: 375 


blockierend 


Die Summe des Anfangsfeldes (definiert vom Operanden "SR=" im Makro- 
befehl FLD) plus der Satzlénge, definiert vom Operanden "RL=" im selben 
Makrobefehl, ist gréfer als 80 fur eine Kartendatei . 


ERROR NUMBER: 376 
blockierend 


Die BlockgréBe, definiert vom Operanden "BS=" im Makrobefeh! FLD, ist 
kleiner als 80 (mit Ausnahme fiir Kartendateien), 


ERROR NUMBER: 377 
blockierend 


Der Wert "RL=LD" oder "LL=LD" fur die vorliegende Eingabedatei ist kleiner 
als 15 bei einer Datei mit Blockzdhlung. Damit liegt eine APS-Einschrénkung 
vor. 


ERROR NUMBER: 378 
blockierend 


Die Mindestsatzlange, definiert mit "RL=" fUr Sdtze fester Linge oder mit "LL=" 
fur Sdtze variabler Lange in dem Makrobefeh! FLD ist kleiner als 20 fur einen 
Block ohne Blockzthlung. 


ERROR NUMBER: 379 
blockierend 


Die Mindestsatzlange, definiert mit "RL=" flr Stitze fester Lange oder mit 
"LL=" fur Sdtze variabler Lange in dem Makrobefeh! FLD ist kleiner als 15 
fur einen Block mit Blockzéhtung. 


ERROR NUMBER; 380 
blockierend 


In dem Makrobefeh! FLD ist der Operand "LF=" fur eine Datei gefunden 
worden, die keine Platteneingabedcatei ist. 
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ERROR NUMBER: 381 
blockierend 


Fur den Operanden "LF=" im Makrobefehl FLD ist ein ungultiger Wert ge- 
funden worden. Dafir gibt es folgende Ursachen: Der Wert lautet dezimal 
Null, der Wert ist gréRer als dezimal 32767, der Wert enthalt ein nicht- 

numerisches Zeichen, er endet nicht mit einem Leerzeichen. 


ERROR NUMBER; 382 
blockierend 


Mit einer Zusatzroutine des Benutzers ist eine nicht-standardmiBige Sub- 
routine angerufen worden. Diese Art Subroutine wird durch das Zeichen "N" 
in Spalte 5 im Index der Subroutinenausgabe vom Programm .LIST angegeben. 
Nicht-standardmafige Subroutinen kénnen nicht in generierte SORT- oder 
MERGE-Programme kompiliert werden. Dieser Fehler wird nur bei Verwendung 
des EDOS angegeben. 


ERROR NUMBER: 383 
blockierend 


Die Taste "Ende der Datei" ist gedriickt worden, bevor der Makrobefehl END 
gefunden worden ist. 


ERROR NUMBER: 384 
blockierend 


Es ist eine ungeblockte Kartendatei oder eine undefinierte Datei erklart 
worden, 


ERROR NUMBER: 385 
blockierend 


Eine Subroutine, die von einer der Zusatzroutinen des Benutzers angerufen 
wurde, ruft die Subroutine YOPN an, die eine der 5 unzuldssigen Sub- 
routinen ist. 


ERROR NUMBER: 386 
blockierend 


Wie unter 385 in Bezug auf YCKP?, 


ERROR NUMBER: 387 
blockierend 


Eine Subroutine, die von einer Zusatzroutine des Benutzers angerufen 
wurde, ruft eine oder beide der unzultissigen Subroutinen YCLOSS oder YREL an. 
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ERROR NUMBER; 388 
blockierend 


In einer Zusatzroutine des Benutzers ist die unzuldssige Subroutine YOPCL 
gefunden worden. Dieser Fehler wird nur bei Verwendung des EDOS signalisiert. 


ERROR NUMBER; 389 
blockierend 


In einer Zusaizroutine des Benutzers ist die unzulissige Subroutine YDCK ge~ 
funden worden. Dieser Fehler wird nur bei Verwendung des EDOS signalisiert. 


ERROR NUMBER: 390 
blockierend 


Eine der Subroutinen, die von einer Zusatzroutine des Benutzers angerufen 
wurde, ruft die unzulassige Subroutine YOPCL an. Dieser Fehler wird nur bei 
Verwendung des EDOS signalisiert. 


ERROR NUMBER: 39] 
blockierend 


Wie unter 390 beztiglich Subroutine YDCK. 


ERROR NUMBER; 392 
blockierend 


Die Startadresse des Schiussels, der in dem Makrobefehl KEY beschrieben 
wurde, ist gréBer als 4096 fur einen alphanumerischen oder bindren Schliissel, 


ERROR NUMBER: 393 
blockierend 


Die Endadresse des SchlUssels, der in dem Makrobefehl KEY beschrieben 
wurde, ist groBer als 4096 fur "KT=2" oder "KT=3". 


ERROR NUMBER: 394 
blockierend 


Eine Kartendatei ist mit einer Mehrfacheingabedatei erklart worden, Diese 
Kombination ist nicht zuldssig. 


ERROR NUMBER; 395 
blockierend 


Mit .SPG wird die Ausgabeplatte fur die Arbeitsplatte durch den Operanden 
"OD=WD" erklart, der Supervisor jedoch erkennt eine Arbeitsplatte, die im 


Byte 133 angegeben wird, nicht an, 
Caen eT EEE EEE EEEEESAaN ED 
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ERROR NUMBER: 396 
blockierend 


Die Angabe, dadie Makrobefehle auf der Platte durch den Operanden "MS" 
in der Karte .SPG gespeichert sind, ist gefunden worden, Diese Angabe 
endet nicht mit einem Leerzeichen oder einem Komma. 


ERROR NUMBER: 397 
blockierend 


In der .SPG-Anrufkarte ist der Operand "AS" gefunden worden, der darauf 
hinweist, da®B die Zusatzroutinen des Benutzers auf der Systemplatte gespeichert 
sind, das Feld endet jedoch nicht mit einem Komma oder einem Leerzeichen. 
Dieser Fehler wird nur bei Verwendung des EDOS signalisiert. 


ERROR NUMBER: 398 
blockierend 


Der Wert des Operanden "RM=" in der Anrufkarte .SPG ist falsch, Entweder 
fehlt der Wert 6 oder 8 bzw. er endet nicht mit einem Komma oder einem 
Leerzeichen. Dieser Fehler wird nur bei Anwendung des EDOS signalisiert. 


ERROR NUMBER: 399 
blockierend 


Die Ausgabedatet auf Band Uberlagert eine Arbeitsdatei auf Band. In diesem 
Fall missen mindestens 2 Arbeitsbander mit standardmaBigem Einstellungs- 
modus vorhanden sein. Diese Anforderungen sind nicht erfullt worden, 


ERROR NUMBER; 400 
blockierend 


Wenn die Ausgabedatei auf Band keine Arbeitsdatei auf Band Uberlagert, 
mu8 mindestens eine der Arbeitsdateien auf Band einen standardmaRigen 
Einstellungsmodus haben. Diese Anforderung ist nicht erfullt worden, 


ERROR NUMBER: 401 
blockierend 


Eine Karte KEND ist zwischen den Makrobefehlen oder Benutzerroutinen 
vor dem Makrobefeh! END gefunden worden. 
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ERROR NUMBER: 402 
blockierend 


In einem SORT-Programm sind eine nicht-definierte Datei und eine Eingabe- 
datei auf Platte erklart worden, Diese Kombination ist nicht zulassig. 


ERROR NUMBER; 403 
blockierend 


Fur ein SORT-Programm auf Platte sind weniger als 2 Arbeitsdateien auf 
Platte erklart worden. 


ERROR NUMBER; 404 
blockierend 


Fur ein SORT-Programm auf Platte sind mehr als 2 Arbeitsdateien auf Platte 
erklart worden, 


ERROR NUMBER: 405 
blockierend 


Ein ungeblockter Bandsatz hat eine gréGte Lange von mehr als 4093, wie vom 
Operanden "GL="" im Makrobefehl FLD definiert wurde. 


ERROR NUMBER: 406 
blockierend 


Bei einem MERGE-Programm ist reine Karteneingabe nicht erlaubt. 


ERROR NUMBER: 407 
blockierend 


Fur eine Eingabedatei mit Satzen fester Linge liegt eine Diskrepanz beim 
Wert des Operanden "RL=" vor. Der Wert mu ein Faktor der BlockgréRe 
sein (minus 5, wenn Blockzahlung vorhanden ist). 


ERROR NUMBER: 408 
blockierend 


Fur die Ausgabedatei mit Sttzen fester Linge oder fir ungeblockte Ausgabe- 
sdtze auf Platte liegt eine Diskrepanz beim Wert von "RL" vor. Es mu ein 
Faktor der BlockgrdBe sein (minus 5, wenn Blockzahlung vorhanden ist). 
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ERROR NUMBER: 409 
blockierend 


Eine Eingabedatei fur ein Sortierprogramm auf Band ist mit einer Uberlagerung 
erklart worden, und die Arbeitsdatei ist nicht fur dieselbe Einheit erklart 
worden. 


ERROR NUMBER; 410 
blockierend 


Ungeblockte Eingabedateien auf Platte und ungeblockte Eingabedateien auf 
Band sind beide fur ein MERGE-Programm erklart worden. Diese Kombination 
ist nicht erlaubt. Dieser Fehler wird nur bei Verwendung des EDOS signalisiert. 


ERROR NUMBER: 411 
blockierend 


Ein Makrobefehl OLAY hat gefordert, daB die Ausgabedatei auf eine Arbeits- 
datei tberlagert wird, Eine Arbeitsdatei mit einem anderen Namen ist fur 

die entsprechende Einheitennummer erklurt worden. Dieser Fehler wird nur 
signalisiert, wenn beide Dateien auf Magnetbiindern stehen, 


ERROR NUMBER: 412 
blockierend 


Mit den Operanden "SF=A" oder "SF=M" mu8 der Satztyp fur die Ausgabe 
"RT=F" lauten. 


ERROR NUMBER: 413 
blockierend 


Bei ungeblockten Stitzen in einem Sortierprogramm mu8 das Ausgabemedium 
dasselbe wie das Eingabemedium sein, Eine ungeblockte Eingabedatei auf 
Band ist erklart worden, wihrend keine ungeblockte Ausgabedatei auf Band 
erklart worden ist. 


ERROR NUMBER: 414 
blockierend 


Mit ungeblockten Sdtzen in einem Sortierprogramm mufi das Ausgabemedium 
das gleiche wie des Eingabemedium sein. Eine ungeblockte Eingabedatei auf 
Platie ist erklart worden, wahrend keine ungeblockte Ausgabedatei auf Platte 
vorhanden ist. 
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ERROR NUMBER; 415 


blockierend 
Fur ein MERGE-Programm sind Arbeitsdatefen auf Platte erklart worden. 


ERROR NUMBER: 416 
blockierend 


Fur ein SORT-Programm ist eine undefinierte Datei erklért worden, wahrend 
der obligatorische Kennsatz NN7 fehlt. 


ERROR NUMBER: 417 
blockierend 


In dem Makrobefeh] USE | ist der Kennsatz "NN2" erkldrt worden, wahrend ce) 
die Méglichkeit des erneuten Startens ausdrticklich ausgeschlossen wurde, 


ERROR NUMBER: 418 
blockierend 


Die Wechselstation einer Ausgabedatei auf Band in einem MERGE-Programm 
ist auf eine Einheit aufgelegt worden, die von einer Eingabedatei auf Band 
benutzt wird. 


ERROR NUMBER: 419 
blockierend 


In der Karte USE | ist die Eingabeverkettung NN4 in einem Programm mit 
ungeblockten Stitzen erklart worden. 


ERROR NUMBER: 420 CO 


blockierend 


In dem Makrobefehl USE I fir ein SORT-Programm mit einer Eingabedatei 
auf Platte ist der Kennsatz NN5 erklart worden, Dieser Fehler wird nur bei 
Verwendung des EDOS signalisiert. 


ERROR NUMBER: 421 
nicht-blockierend 


In dem Makrobefehl USE | fiir ein SORT-Programm ohne eine zusdtzliche 
Eingabedatei auf Karten, ist der Kennsatz NN6 erklért worden. 


oO 
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ERROR NUMBER; 422 
blockierend 


Der Operand "SR=" ist in einer Karte CFL fruher schon benutzt worden, um 
die Kartendatei zu beschreiben, Diese Situation ist nicht eindeutig. Der 
Makrobefeh! FLD fur die Kartendaiei mu getndert werden, 


ERROR NUMBER: 423 
blockierend 


Auf den MakrobefehI ESCT folgt der Makrobefehl END. Der Makrobefehl 
ESCT ist nicht erforderlich und muf entfernt werden, 


ERROR NUMBER: 424 
blockierend 


Dieser Fehler wird signalisiert, wenn kein Makrobefehl CFL gefunden worden 
ist und die Operanden in dem Makrobefehl FLD zur Definition der Kartendatei 
weitere Informationen Uber den Aufbau der Kartendatei fur das .SPG-Programm 
erfordern. Kartensdtze von variabler Lange oder eine Satzgrée von mehr als 
80 erfordern weitere Definitionen durch den Makrobefeh| CFL. 


ERROR NUMBER: 425 


blockierend 


In einem Makrobefehl FLD fur ein MERGE-Programm ist der Operand “SF=" 


gefunden worden. Dieser Operand ist nur bei einem SORT-Programm anwendbar. 


ERROR NUMBER: 426 
blockierend 


Der Operand “LF=" ist flr ein Programm benutzt worden, das keine Platten- 
eingabe und Bandausgabe hat. 


ERROR NUMBER: 427 
blockierend 


Die Zusatzroutinen des Benutzers benétigen mehr als 8 Zylinder, wenn sie 
auf der Systemplatte mit 3 Kartenbildern pro Sektor gespeichert werden. 
Das ist mehr als das .SPG-Programm zula8t. Der Fehler wird nur bei Ver- 
wendung des EDOS signalistert. 


ERROR NUMBER; 428 
blockierend 


Fur ein SORT-Programm sind Eingabedateien auf Band und Platte erklart 
worden, 
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ERROR NUMBER: 429 
blockierend 


Im FLD Makrobefehl wurde fur die Eingabe einer Magnetplattendatei der 
Parameter "SF=A" angegeben. 

In diesem Fall mu® der Wert des "RL-LI" fur die Ausgabedatei 8 sein, wenn 
sich die Ausgabedatei auf Magnetband befindet oder 9, wenn sich die Ausgabe 
auf Magnetplatte befindet. Diese Regel wurde nicht beachtet. 


ERROR NUMBER: 430 
blockierend 


innerhalb einer Benutzerroutine wurde fiir den Anruf der YTAPE Routine einer 
der folgenden Befehle benutzt: oO 


JRT 104 oder JRT YTAPE 
JIRT 720 oder JRT YMTAPE 
oder JRT 724 oder JRT YVMT oder JRT YTAPE +4 


In einer Benuizerroutine wurde ein "ORG"-Befehl gefunden, mit dem die 
absolute Adresse in den Bereich der Bandbearbeitungsroutine im EDOS gesetzt 
wird. 


ERROR NUMBER: 431 
blockierend 


Im Mckrobefehl fur die Eingabedatei einer Magnetplatte wurde der Parameter 
"SF=M" gefunden. In diesem Fall mu der Wert “RL-LI-8" (bei Bandausgabe) 
oder "RL-LI-9" (bei Magnetplattenausgabe) gleich der Lange der Summe der 
definierten Schlussel sein, die im Sort definiert wurden. Diese Regelt wurde 


nicht beachtet. oO 


ERROR NUMBER: 432 
blockierend 


Die Ausgabedatei auf einer Magnetplatte wurde im 6-Bit-Modus definiert 
(explizit uder implizit), und ein gepackter Schlussel mit Vorzeichen wurde 
definiert. Fur eine 6-Bit-Datei ist diese SchlUsseldarstellung nicht méglich. 


ERROR NUMBER: 434 
blockierend 


Eine Arbeitszone wurde im 6-Bit-Modus definiert (explizit oder implizit), 


es wurde jedoch ein gepackter Schlusse! mit Vorzeichen angegeben. Diese 
Schltisselangabe ist fir eine Datei im 6-Bit-Modus nicht mdglich. 
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ERROR NUMBER: 435 
blockierend 


Die Angabe "PM=P" fur Arbeitsbinder hat keine Bedeutung, wenn im EDOS 
gearbeitet wird. 


ERROR NUMBER: 436 
blockierend 


Bei einem Mischprogramm mit ungeblockten Sitzen missen alle Eingabedateien 
auf Magnetband sein, wenn die Ausgabe auf Band erfolgt, oder es miissen alle 
Eingabedateien auf Magnetplatte sein, wenn die Ausgabe auf Platte erfolgt. 
Diese Bedingung wurde nicht beachtet. 


-) ERROR NUMBER; 437 
blockierend 


tn einem FLD-Makrobefehl fiir ein Mischprogramm wurde der Parameter “MR=" 
gefunden. Fur diese Art des Programms hat dieser Parameter keine Bedeutung. 


ERROR NUMBER: 438 


nicht-blockierend 


Die Bedingung (GL-LD) Eingabe » (GL-LI} Ausgabe wurde fur Satze gefunden, 
die keine feste Lange haben. Dadurch gehen am Ende der Ausgabesiitze 
Zeichenverloren. Dieser Fehler wird sooft angegeben, wie unqualifizierte 
Angaben vorliegen. 


ERROR NUMBER: 439 
nicht-blockierend 


oO Die Bedingung (LL-LD) Eingabe < (LL-L1) Ausgabe wurde fur Sttze festgestellt, 
die keine feste Lange haben. Dadurch werden den Sdtzen in der Ausgabezone 
Leerzeichen hinzugeftigt. 


ERROR NUMBER: 440 
blockierend 


Es wurde keine Ausgabedatei definiert. 


ERROR NUMBER; 441 
blockierend 


Der Wert des Operanden "OD=" in der Orderkarte .SPG ist nicht mit einem 
# oder einem Komma abgeschlossen, 
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ERROR NUMBER: 442 
blockierend 


Fur die Eingabe wurde eine Kartendatei als Satzadressendatei definiert, es 
wurden die Parameter "SF=M" oder "SF=A" angegeben. Dies ist nicht ge- 
stattet. 


xERROR NUMBER: 443 
‘plockierend 


Es wurden Arbeitsdateien sowohl fiir Magnetbinder als auch fir Platten an- 
gegeben, Arbeitsdateien dirfen nur auf einer Art eines Datentragers ent- 
halten sein. 


ERROR NUMBER: 444 
blockierend 


Der vorgeschriebene Operand "OD=" kann auf der .SPG~Karte nicht ge- 
funden werden, 
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ERROR NUMBER: 471 
Non-Catastrophic 


4 
The operand "DV=MT" (meaning 7-track tape) has been used with the explicit 
operand "RM=8", To allow a correct, but perhaps less efficient, object program 
to be generated, the assumption chosen is the same as for Error Number 470 
above. 


ERROR NUMBER: 472 


(*) Catastrophic 


Record too long to be sorted using disc work files in the EDOS environment. By 
record length is meant the "effective maximum record length" during the sorting 
phase, and is equivalent to 10 sectors, corresponding to 2880 characters for &bit 
dise work files and 3840 characters for 6-bit disc work files; it is the length after 
object program editing (i.e. length decrease) and/or User editing have been 
completed, Remember that a record coming from tape will have its effective 
length increased by 1 to allow for the dise record code. This error may anticipate 
Error Number 502 being signalled during Object Program generation. A method 

to avoid this error is to use an address sort, and after the sort, to reconstruct 
the output file using the record addresses, 


ERROR NUMBER: 473 


Catastrophic 

The operand ''PM=N" have been used when one or more of the work tapes has 
eo" declared explicitly or implicitly as 7-track. The reason for this error 

condition is that a read-forward-only tape sort is generated when 1 or more 

. work tapes are 7-track; in this case, during the sorting phase the work tapes 

are rewound and the object program has no means of repositioning the tape 

with the non-standard positioning mode "PM=N", This situation does not occur 

for a read-reverse tape sort. 

A possible solution is to substitute the "PM=N" option for that of "PM=E", making 

sure that it agrees with the requirements of the latter. 


ERROR NUMBER: 474 
Catastrophic 


A disc output file has been declared for a multi-reel sort. This is 
an unacceptable combination, 
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Dimensionsfehler im Ursprungsprogramm 


Ursprungsprogramme, die keine Format- und Inhaltsfehler aufweisen, werden 
weiterhin getestet, ob der fur das Objektprogramm zugeordnete Kernspeicher- 
platz ausreicht. Es gibt zwei Arten von Dimensionsfehlern, Die eine Art 
wirkt blockierend und unterbricht die Generierung; die andere Art ist nicht=- 
blockierend und weist den Benutzer auf die Schwachen im Objektprogramm 
hin. Die Fehler konnen nicht in diesem Stadium korrigiert werden: Es ist ein 
weiterer Lauf des Generators mit einem ergtinzten Ursprungsprogramm erfor- 
derlich, 


Alle Dimensionsfehler werden zusammen mit den erforderlichen Anweisungen 
ausgedruckt, Die Dimensionsfehler werden von 500 an gezuhit. 


ERROR 500 SORT IS INPUT LIMITED BY XXXXX OCTETS 


Dieser Fehler ist nicht-blockierend. Fir eine gréGere Wirksamkeit im Sortier~ 
programm auf Band oder Platte muf die Kernspeicherbelegung in der Eingabe 
(Vorsortieren) um XXXXX Bytes reduziert werden. Dafir gibt es folgende 
Maglichkeiten: 


~ Reduzierung der Puffergré@e in der Eingabe (der Eingabedatei sind zwei 
Puffer zugeordnet). 

~ Reduzierung des Kernspeicherteils, der von der Zusatzsektion | belegt 
wird. 


ERROR 501 SORT 1S OUTPUT LIMITED BY XXXXX OCTETS 


Dieser Fehler ist nicht-blockierend. Es gilt dieselbe Aussage wie unter 
ERROR 500. Dieser Fehler kann durch folgende Moglichkeiten behoben 


werden: 
~ Reduktion der PuffergréBe fiir die Ausgabe (der Ausgabedatei sind zwei 
Puffer zugeordnet). 


- Reduktion des Kemspeicherteils, der von der Zusatzsektion O belegt 
wird. 
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ERROR 502 SORT IMPOSSIBLE: WORKING BUFFER SIZE = XXXXX 


Dieser Fehler ist blockierend. Die berechnete GréBe des Arbeitspuffers auf 
einem Band oder einer Platte Uberschreitet die maximale interne Satzlinge 
nicht um mindestens 6 Bytes. Wenn die Fehler 500 und 501 ausgedruckt 
worden sind, ist der Fehler in der Eingabe- oder Ausgabephase entstanden 
und wird auf die beschriebene Art behoben. Wenn keiner dieser Fehler aus- 
gedruckt worden ist, liegt der Fehler in der Arbeitsphase und folgende 
Lésungen sind maglich: 

~ Reduktion der Common Storage. 


- Ersetzen der Sektion C durch eine generierte Vergleichsroutine plus Um- 
wandlung und erneutem Laden in den Sektionen | und O. 


- Bei Sortierprogrammen auf Band: Reduktion der Anzahl der Arbeitseinheiten- 
ERROR 503 MERGE IMPOSSIBLE: XXXXX OCTETS SHORT 

Dieser Fehler ist blockierend. Das Dateimischprogramm kann nicht erstellt 
werden, da der verfigbare Kernspeicher um XXXXX-~Bytes zu klein ist. 

Es gibt folgende Miglichkeiten: 


= Reduktion eines oder mehrerer PuffergréBen fur die Eingabe oder Ausgabe 
(jeder Datei sind zwei Puffer zugeordnet). 


- Reduktion der Lange der Zusatzsektion M 


- Reduktion der Common Storage. 


Haltefalle des Ursprungprogramns 


1. Hexadezimal 1211 
Dieser Halt tritt ein, wenn fiir eine Compilation 


des Ursprungprogramms, auf der Dise zu:wenig 
Platz vorhanden ist. 
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7.5. Haltefalle des Objektprogramms 
tm Objektprogramm gibt es die folgenden Halteadressen. 
1. Hexadezima! 0300 


Diese Adresse wird benutzt, wenn eine oder mehrere Standardmeldungen 
auf dem Drucker ausgegeben worden sind. Die Eingriffe des Operators 
werden in den Meldungen beschrieben. 

Nach Ausfthrung des Etngriffes driickt der Operator die Taste START. 


2. Hexadezimal 0302 


Diese Adresse wird benutzt, wenn ein Eingabeblock oder eine Eingabe- . 
page keine ganze Anzahl von Sitzen enthalt. Der Programmlauf muf 
unterbrochen werden. 
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7.6. Anweisungen des Objektprogramms 


Wenn das Objektprogramm auf der hexadezimalen Adresse 300 anhalt, ist 
eine oder mehrere der folgenden Meldungen ausgedruckt worden. Die 
Meldungen werden in alphabetischer Reihenfolge aufgefiihrt. 


1. 


GE-120/130 


BEGINNING OF DISC SORT 


Diese Meldung wird zu Beginn der Vorsortierphase eines Sortierprogramms 
auf Platte gedruckt. 


BEGINNING OF FILE MERGE 


Diese Meldung wird nach der Dateieréffnungsphase von Dateimischpro- 
grammen gedruckt. 


BEGINNING OF TAPE REEL COLLATION 


Diese Meldung weist daraufhin, dai die kompliziertere Operationsphase 
erreicht worden ist und die folgenden Anweisungen besonders berick- 
sichtigt werden mUssen. 


BEGINNING OF TAPE SORT 


Diese Meldung wird bei Beginn der Vorsortierphase der Sortierprogramme 
auf Band gedruckt. 


END OF JOB 


Diese Meldung wird am Ende des Programms gedruckt. Durch Driicken 
der Taste START wird die Steyerung an das Operating System oder an 
die Zusatzroutine O auf dem Verkettungspunkt PP4 zuriickgegeben. 


LABEL FILES Hy Hy Sais, HL = WORK TAPES 


Diese Meldung wird nur bei Sortierprogrammen auf mehreren Spulen 
benutzt. Sie weist darauf hin, daf jetzt alle Zwischendateien Hy, 

Hz bis H_. Uberschrieben werden kénnen und de® der interne Zwischen- 
kennsatz durch den Kennsatz Arbeitsband ersetzt werden kann. Diese 
Meldung bezieht sich auf alle Datentrager der Dateien. Danach kann 
nur zu dem vorhergehenden Checkpoint zuriickgesprungen werden. 
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7. LABEL TAPE FROM TAPE UNIT Z = X ---- X VOLUME Y ---- Y 


Das Bard wird auf die Einheit Z ubertragen und mit dem externen 
Dateikennsatz X ---- X Volume Y ---- Y erhalten. Die Datei ist 
entweder eine Zwischendatei und wird spiter im Sortierprogramm 
bendtigt. In diesem Falle ist der Name X ---~ X vom Typ AM, BN 
oder Teil der endgiltigen Ausgabe, in welchem Falle X ---- X der 
Name der Ausgabedatei ist. 


8, LOAD CARD FILE 


Diese Meldung wird zu Beginn des Sortierprogramms ausgedruckt, 
wenn Karteneingabe erklart worden ist oder nach dem Lesen der 


oO priméren Datei bei gemischter Eingabe. 


9. LOAD CONTINUATION WORK REEL ON TAPE UNIT Z START TO 
CONTINUE 


Die erhaltene Spule wird geladen, wenn zuletzt die Meldung 14 
ausgedruckt wurde. 


10, LOAD FILE X ---- X Volume Y ---- Y ON DISC UNIT Z 


Der Plattenstape! auf der Einheit Z wird durch den Plattenstape! 
ersetzt, der die geforderte Datenmenge enthdlt, sofern sie nicht 
schon eingelesen wurde, 


11, LOAD FILE X ---- X Volume V ---- Y ON TAPE UNIT Z 


Das angeforderte Band wird eingelesen. Wenn die Einheit schon eine 
7) Banddatei enthalt, wird das Band entladen und wenn die Meidung vom 
Typ 7 fir dieses Band ausgedruckt worden ist, bleiben die Daten erhalten. 


Bemerkung; 
Der Dateiname und die Nummer des Datentrdagers kénnen als Zwischen- 
dateien verwendet werden: Siehe Meldung 7. 


12, LOAD FINAL OUTPUT DISC VOLUME Y ---- Y ON UNIT Z 


Diese Meldung wird ausgedruckt, um das Laden der letzten Platten- 
ausgabe Y ---- Y auf die Einheit Z zu veranlassen. 


oO 
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13. LOAD FINAL OUTPUT TAPE REEL Y ---- Y ON UNIT Z 


Diese Meldung weist darauf hin, dat ein Band, das fiir die erste Spule 
oder ntichste Spule der Ausgabedatei passend ist, auf die Einheit Z 
geladen wird. Es wird empfohlen, nicht dieselben Bander, die fir die 
endgtltige Ausgabe von Sortierprogrammen auf Band benutzt werden, 
als Arbeitsdateien zu benutzen. 


14, LOAD FURTHER WORK REEL ON TAPE UNIT Z 
"START" TO CONTINUE 


Diese Zeilen werden in einem Sortierprogramm auf Band ausgedruckt, 

wenn ein Overflow auf einer Arbeitsdate! erfolgt und keine weitere 

Arbeitsdatei mit mehreren Spulen vorliegt. Entweder mu der Operator oO 
der Anweisung foigen oder eine gréfere Spule laden und zum vorherigen 
Wiederanlaufpunkt zurickkehren. Folgt der Operator der Anweisung, 

so muB die volle Spule erhalten bleiben, bis die Meldung 15 ausgedruckt 

wird, 


15. LOAD ORIGINAL WORK REEL ON TAPE UNIT Z 


Die aus der Meldung 14 resultierende Spule wird jetzt geladen. Bei 
einem Sortierprogramm mit Lesen vorwirts muB die Spule, die auf der 
Einheit aufliegt, erhalten bleiben, bis eine Anweisung vom Typ 9 
erfolgt. Bei einem Sortierprogramm mit Lesen riickwirts ist diese Spule 
nur erforderlich, wenn erneutes Starten vom besetzten Checkpoint 
erfolgt. 


16. LOAD WORK TAPE ON TAPE UNIT Z 


Auf die Einheit Z wird ein Reserveband oder eins, das durch die oO 
Meldung vom Typ 6 frei geworden ist, geladen. 


17, OUTPUT FILE X ---- X VOLUME Y ---- Y ON DISC UNIT Z 
Diese Meldung wird gedruckt, wenn eine Ausgabedatei auf Platte aus 


mehreren Platienstapeln besteht und wird vor der Meldung 12 ausge-~ 
druckt, die die nachsten Plattenstapel anfordert. 
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18. RUN ABANDONED - OVERFLOW ON TAPE UNIT Z 


Zwei Arbeitsdateien auf Band sind gleichzeitig Mehrfachdateien. Damit 
wird darauf hingeweisen, daB eine Datenmenge, die sehr viel groBer 


als empfoblen ist, in ein Sortierprogramm auf Band eingegeben 
worden ist oder dali ein Overflow auf einer Datei mit nicht-standard- 
m&Bigem Einstellmodus erfolgt ist. 


19, RUN ABANDONED - OVERFLOW ON X -~-- X DISC FILE 


X ---- X ist WORK 1, WORK 2 oder OUTPUT. Die angegebene Datei 
ist nicht groB genug. Das Programm mu emeut gestartet werden. 
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INTRODUCTION 


This manual is designed as a programming reference for users of the 
GE 120/130 RPG Report Program Generator, or REG, it contains complete 
information for using RPG language to prepare applications programs. 


The GE 120/130 RPG User's Guide is intended for use by those who have no 
programming experience and by experienced programmers. To aid the new 
user of RPG there are definitions of special terms and a section which 
explains the principles of use of RPG. These sections precede the 
detailed chapters on RPG forms and processing. The experienced RPG user 
need not read the introductory sections but may, instead, use the Guide 
as a working reference for writing his programs. 


GE 120/130 RPG operates under ETOS and EDOS. The Reader must be familiar 
with the system he is using. 


Note: The programming forms throughout the text are sketches, while the 
actual forms are shown in part XIV starting from page 32. 
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1, GENERAL DESCRIPTION OF RPG GE 120/130 


SYSTEM DEFINITION 


The GE 120/130 Report Program Generator (RPG) System is designed to 
accept specification statements written in the standard RPG language 
format and to prepare from them object programs in GE 120/130 machine [ 
language. 


Initially the RPG specification language was intended for use in 
report generating computer applications. However the flexibility of 
the language makes it a valuable general programming tool. 


The GE 120/130 RPG user describes his application program in RPG 
language, specifying data and processes in familiar terminology and 
the RPG compiler automatically programs that application, 


System functions 


In brief, GE 120/130 RPG reads five different types of specification 
statements and uses them to generate object code to carry out an 
applications program. 


The five statement types which are processed are: 


Pile Description Specification Statements; 
File Extension Specification Statements; 
Input Specification Statements; 
Calculation Specification Statements; 
Output-Format Specification Statements. 


From these statements, GE 120/130 RPG: 


@ generates a program to perform the specified processes and 
to produce the specified output; then, 


@ places the program on an output medium in form fox inser- 


tion in the system file (usex provides -API) or punching on 
eards (user provides .APP). 
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2. Hardware environments 
The operation environments for GE 120/130 RPG are described below. 
a. The minimum configuration for generation 

12288 octets of store; 

card reader; 


2 discs; 
printer; 


or 


12288 octets of store; 
card reader; 
3 magnetic tape units; 
printer. ; 


b. = The minimum configuration for execution 


The minimal systems required for generation are required for 
execution. 


c. Additional equipment supported 


Additional input and output units and store as required by the 
applications program are supported by RPG within the scope of 
the respective EIOS (Extended Input/Output Operating System), 
EDOS (Extended Disc Operating System) and ETOS (Extended Tape 
Operating System). 


3. Software environments 


The RPG Compiler for the GE 120/130 RPG System functions under EDOS 
and ETOS. (See the Appendices for a detailed discussion of the pro- 
cedure for preparing RPG programs in each of these operating contexts.) 


Interaction with EDOS and ETOS has certain implications for the RPG 
object program. Data file organization and processing have all the 
flexibility offered by EIOS for data handling. 


These systems require about 4K of core. Additionally, the BIOs 
system requires that data file tables follow a standard pattern and 
reside in store immediately adjacent to the resident operating system 
area. However, the RPG Compiler carries out the processing necessary 
to integrate the object program effectively into its operating 
context, 


GE 120/130 RPG USER'S GUIDE 
GENERAL DESCRIPTION OF RPG GE 120/130 


DIAGRAM OF SYSTEM FLOW 
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FIGURE 1.A DIAGRAM OF SYSTEM FLOW 
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RPG PROGRAMMING FUNDAMENTALS 


This chapter describes the use of RPG to specify some of the most 
common processes programmed in that language. 


Programmers who are unfamiliar with data processing terminology are 
advised to read Appendix A, GLOSSARY OF TERMS, before proceeding 
further. Programmers who are familiar with the basic concepts of 
RPG need read only the "Definition of Terms" below. They need not 
read the remainder of the chapter unless they desire to refresh their 
knowledge of RPG. 


Definition of terms 


Certain terms, used in this manual, are generalized data processing 
terms having a wide applicability. To clarify their use in the 
present context they are defined below as they apply to GE 120/130 RPG. 


Other terms which are defined below have a particular significance 
in describing the use of RPG specifications, 


a. Alphameric field 


Any data field for which a decimal position specification is not 
provided is regarded as alphameric. The contents may be alpha- 

betic, numeric or alphameric. The meaning of alphameric in this 
sense is in the processing. Alphameric fields enter core store 

in unpacked format. 


b. Alphameric literal 


Alphameric literals are composed of the graphic characters in 
the GE 120/130 set. ‘hey must be specified between apostrophes ('}. 


c. Chained file 


A file read by means of pointers to specific records to be pro- 
cessed, where such pointers are developed from fields in a 
pointer file called a chaining file (see below). 


d. Chaining 
The technique of using data in one file as a pointer to a 
specific record in another file as a means of reading data files 
selectively, in random access of desired information. Has mean- 
ing only for dise files. 

e. Chaining field 


The field which Links or chains a record of one file to a 
record in another file. 
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Chaining file 


A file which contains fields used as pointers to obtain records 
from associated files is called a chaining file. The fields 
which serve as pointers are called chaining fields, Chaining 
fields contain data which gives a means of addressing the asso~ 
ciated file. The chaining field is most usually some data item 
prepared in a form that allows it to be converted by a standard 
process to yield the address of the associated record. 


Contro] break 


A term used to indicate that information in data fields used for 
comparisons (see below) has changed. A control break is used to 
condition processing. 


Control field 


A data field which contains information to be compared from 
record to record is a control field. A control field may be a 
composite of fields within the record. There may be a number of 
control fields specified for a given RPG program. 


Control level 


The relative importance of control fields within an RPG program 
is established by assigning them numbers called control levels. 


Indicators 


Indicators are single character fields which have two values - 
on and off, They are used to reflect the status of some RPG 
field, the presence of some record or field, the result of a 
ealculation or table search. Therefore, they can be used to 
condition operations which depend on field status, result of a 
calculation etc, 


Numeric fields 


When a decimal position specification is provided for some field 
that field is referred to as numeric. 


The contents of numeric fields enter core store in packed deci- 
mal format and should, therefore, contain only numeric characters 
with or without a.sign over the rightmost position. 


Numeric literal 
Only the decimal symbol (.) and/or a plus or minus sign may 


appear in numeric literals in addition to the digits 0 through 
9. Numeric literals must not be written between apostrophes. 
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m. Random (or direct) file organization 


Data files are referred to as randomly (or directly) organized 
when the address of a record is retrieved by the use of its 
relationship to the record key. The relationship defining an 
address in terms of a key is established by the designer of the 
file. 


n. Random (or direct) file processing 


In random (or direct) processing the sequence of processing is 
not related to the sequence in which data is stored in the file 
but proceeds according to the use pattern established in the 
application, 


o. Resulting indicators 
1) Definition 


Indicators are defined as resulting indicators when they are 
specified as being used to indicate status of a field, 
presence of a record or the result of calculations. This is 
done by writing indicator specifications in the applicable 
resulting indicator positions on Input Specifications and 
Calculation Specifications. Indicators are set or reset 
according to such specifications. 


2) Interrogation 


Indicators are interrogated when they are used in the con~ 
ditioning fields of calculation or output statements. The 
use of indicators to condition processing does not cause any 
setting or resetting. 


BASIC CONCEPTS OF RPG PROGRAMMING 


Programming in RPG is essentially a task of describing a process that 
is to be carried out. There are, therefore, three major elements 
that must be described: 


e Data To Be Processed - the INPUT; 
@ Processes To Be Performed ~ the CALCULATIONS; 
@ Results To Be Produced - the OUTPUT. 


The RPG Compiler generates a program to produce the OUTPUT from the 
INPUT by means of the specified CALCULATIONS, 


Describing the input 


There are three levels of information about input files which must be 
given to. the RPG system: 


© FILE DESCRIPTIONS; 


@ RECORD DESCRIPTIONS+ 
@ FIELD DESCRIPTIONS. 
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File descriptions 


Files are described on the Pile Description form. This form 
provides the programmer with the means of supplying GE 120/130 
RPG with all descriptive information necessary to treat his 
files. Both logical characteristics like organization and 
physical characteristics like format are provided to RPG on this 
form. All uses of records and files within the file are then 
made in accordance with the characteristics of the file itself. 


Certain file types, like files which contain tables or are used 
in the context of chaining, require, in addition to the informa- 
tion about format and organization, information about method of 
processing. Such additional information is provided on the 
File Extension Form. Thus, while every file used in GE 120/130 
RPG must be described on File Description Forms, only special 
purpose files require the additional information provided by the 
File Extension Form. 


Record descriptions 


The second and third levels of input description are entered on 
the Input Form. 


Each record that is to be processed must be associated with the 
file in which it is contained. This is done by means of the 
Input Form which both associates a record with a file and pro-~ 
vides identification for recognizing that record. 


Such information as content = e.g., the presence of a given 
character in a given position, is used to identify different 
types of records in a file. As a means of using specific data 
from the various record types for specific processing the Input 
Form allows for a signal to be set in the produced program 
whenever a given record is read. 


Fietd descriptions 


Input Specifications provide RPG with the third level of input 
Gescription: that of fields. Each field is associated with a 
specific record and thus with a specific file. Fields which are 
used in more than one file with the same name pose no difficulty 
for identification. Each field is described to GE 120/130 RPG 
in context of the record to which it belongs. 


Field descriptors are: 


length 

format ~ e.g., alphameric or numeric 

Magnitude = e.g., number of decimal positions if numeric 

use - i.e., standard processing, control, matching or chain- 
ing 
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Process descriptions 


Processing to be carried out is described on forms called Calculation 
Forms. GE 120/130 RPG is not, however, a calculations oriented 
language. The processes that may be performed allow the programmer 
to describe all of the steps required for treating his input fields 
to produce his required output. 


Logically there are two general points at which processing is done: 


b. 


Cc. 


detail time 
total time. 


Detail time processing 


Detail time is used to refer to the operations which are to be 
carried out on the normal records of files being processed in a 
given RPG program. It is contrasted, therefore, with total time 
processing, 


Total time processing 


Total time processing is distinguished from detail time process- 
ing in that it includes operations which are carried out only 
when certain data is available. Thus, for example, all orders 
Placed by a given salesman might be checked and billed at detail 
time, i.e., as the ordinary sales records are processed. His 
commission, on the other hand, might be computed at total time, 
i.e., when a sales record was read that contained a code indi- 
cating that it was the last item for that salesman, 


How to describe detail and total processing 


The operations that. RPG provides permit the user to describe 
fully how his data is to be treated. 


It is this section of RPG Compiler input that most closely 
approximates programming. 


The user must specify how his data is to be utilized to produce 
output, Each logical data item (called a field) that enters 
into processing is described to the RPG Compiler, either on 
Input or on the Calculations Form, if the item is produced by 
processing some other data. 


The characteristics specified for each item, e.g., format, number 
of positions, enables the RPG Compiler to produce the required 
program to carry out operations like calculations, table look-up, 
collating and insertion of data from one file into another. 


The sequence in which operations must be performed to give the 
desired result determines the sequence in which those operations 
are described to RPG. 
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Logical capabilities, i-e., the ability to perform certain 
Operations only in the presence ~ or absence - of recognizable 
values or conditions are provided through the use of special 
fields called indicators. 


Special purpose processing which performs standard calculations 
already programmed in symbolic assembly language can be utilized 
within RPG programs. The user requests their use by an opera~ 
tion called EXIT which links the RPG produced program to the 
standard program. 


All operations provided by RPG may be used on either detail or 
total calculations. 


1) Using control levels 


Control levels are associated with control fields (see 
DEFINITIONS). They are used to indicate the presence of 
some data or condition which signals that total time pro- 
cessing is to be performed. 


Several levels are provided so that total calculations may 
be logically grouped by natural breakpoints within the 

data. Thus, for example, total sales per salesman might 

be one level, total by office another, totals by all offices 
constituting a sales region still another and so on. 


2) Using indicators 


The user controls the sequence of his processing by means 
of indicators, All processing steps are written down in 
the normal order of their occurrence. When certain data 
requires exceptional handling at a given point that excep- 
tional processing is also specified, To avoid having all 
other data, treated the same way the programmer may asso- 
ciate a logical maxk with the exceptional data. This 
logical mark is called an indicator. It is given two 
values, one to indicate that the condition it present (ON) 
and the other to indicate that it is not present (OFF). 
The programmer provides the required information for 
setting the marker, e.g., a particular value in a given 
position to identify a specific type of data record. He 
can then specify the presence or absence of the marker as 
a condition for carrying out certain steps in his process- 
ing. 


3) Breaking program sequence by branching 


Another means of controlling the processing flow is pro- 
vided through branching operations, The usex may either 
repeat a sequence of processing by branching back to a 
point he names in his processing or he may, under some 
conditions skip over some processing that might otherwise 
be performed. 
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Making calculations 


The RPG Compiler prepares programs that perform the standard 
arithmetic operations: 


addition 
subtraction 
multiplication 
division. 


In doing so, the RPG system also sets up all necessary data 
moves to align fields of different magnitudes and, if 
required, to round results. Such operations are auto- 
matically performed by the object program prepared from RPG 
Source statements, They are therefore set up for general~ 
ized quantities expressed in terms of length, sign, order 
of magnitude. It is the responsibility of the RPG pro- 
grammer to write generalized descriptions that conform to 
his specific data, The RPG‘ program cannot correct his 
specifications in terms of his data, For example, consider 
three fields A, B, and C described as integers of 4 places 
each. B is added to A to produce C. There are several 
possibilities. It could be known that B, for example, 
never has more than 3 significant places and that A is at 
maximum 7 in the most significant digit. A specification 
of 4 places for the sum of A and B is reasonable in this 
case, On the other hand, even if B had at maximum three 
significant digits the sum could be greater than 4 digits 
therefore no longer expressible in C, a 4 place field. In 
a case such as this the result produced is incorrect and 
the programmer alone has the information necessary to 
discover the error and correct it. 


This same sort of error is possible in all calculations. 
Rules are given in the applicable sections of this manual 
to assist the programmer in preparing correct specifica- 
tions. 


When an arithmetic result is such that it cannot he validly 
expressed using the number of places allowed it is said to 
overflow the field ~ i.e., be too large. (This is arith- 
metic overflow as distinguished from page overflow, when a 
line to be printed cannot fit on the page presently being 
printed,} 
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Describing output 


Qutput to be prepared is described in a manner similar to that used 
to describe input, Bach card, print line, tape record or disc record 
that is to be written by the program generated by the RPG system is 
described on an Output-Format Specification Form. The information 
required is analagous to that supplied for input: 


record in the file which contains the information; 
file of which the record is part; 

placement of the items (fields) within the record; - 
characteristics of the record. 


a. Output record 


Records for output as a result of some RPG processing must be 
related to the file of which they are a part. The RPG Compiler 
prepares all the necessary processing to constitute the records 
of a file and to place them in that file. 


The format of the file is governed by use or descriptions as 

well. Printed pages are spaced according to the spacing infor- 
mation provided in the SPACE and SKIP columns of the Output- 
Format. The programmer may write as many lines - or as few - as 

he wishes on a page. By the use of specialized indicators, the 

OV and/or OF, he may position heading information. If there is 
only one printer carriage, he may use only one overflow indicator. | 


There are three logical kinds of records: 


@ heading 
e detail 
e total 


1) Heading records 
Heading records are identified by an H. They are the 
identification information which describes the data that 
forms part of the Report being printed. 

2) Detail records 


Detail lines correspond to detail time printing. The 
detail lines are the standard body lines in the report. 


3) Total records 


There may be several levels of total lines, corresponding 
to the various levels of total calculations. 
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Output fields 


Fields in output records may be generated by the RPG processing 
or they may be edited input fields. 


Edit specifications may be provided to perform the standard 
editing like zero suppression, insertion of dollar signs, etc. 
A special constant depicting the format of the desired output 
is written on the Output Specifications. This constant, called 
an edit word, enables the RPG Compiler to produce a program 
which formats a field according to the characteristics shown. 


Constants may be inserted into output fields as well by means 
of Output-Format Specifications. 
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TY. THE RPG CONTROL RECORD 


The first input record type read by the RPG Compiler is the con- 
trol record. The characteristics of this record are described below. 


A. FUNCTION OF THE CONTROL RECORD 


The control record is used by the RPG programmer to: 
e@ indicate the size of the object machine; 


@ describe the format of sterling-currency fields if any are 
present; 


@ choose European notation for printing his numeric output; 
@ indicate that altered collating sequence will he used; 

@ define the origin of his cbject program; 

@ name his program; 

@ indicate the presence of a user print error subroutine; 
@ provide the punch connector number, where applicable; 

e@ indicate whether work tapes are 7 or 9 track; 


@ request an APS listing. 


B. FORMAT AND CONTENT OF THE CONTROL RECORD 


Character 
Positions Contents Use 
1-4 «RPG Identifies the card as an RPG 
control card. 
5-9 Any GE 120/130 charac- Not used. 
ters, including blanks 
10 blank . No use is made of this specifica- 


tion by RPG. 
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Character 


Positions 


11-12 


13-14 


15-16 


17 


18 


19 


Contenrd tf 


Must be blank’ 


03 or blanks 


04 to 16 


Any GE 120/130 charac- 
ters, including blanks 


5 E 


blank 


blank 


I 
fr 
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Use 
Reserved to RPG system. 


Indicates the object program is 
to be executed on a GE 120/130 
with a storage size of 12K. 


Provides the multiple of 4096 
octets to be used to determine 

the size of the GE 120/130 on which 
the program will be executed. 


A value less than 03 is made 03; 
no check for alphabetic charac— 
ters is performed. 


Not used, 


Indicates that the shillings por- 
tion of a sterling-currency input 
field is in GE format. 


Indicates that the shillings por- 
tion of a sterling-currency input 
field is in the British Standards 
Institute format. 


Indicates that input does not 
contain sterling-currency fields, 


Indicates that the pence portion 
of a sterling-currency input 
field is in GE format. 


Indicates that the pence portion 
of a sterling-currency input 
field is in the British Standards 
Institute format. 


Indicates that the input does not 
contain sterling-currency fields. 


Indicates that the shillings por- 
tion of a sterling-currency out- 
put field is in printer format. 
Indicates that the shillings por 
tion of a sterling-currency out- 
put field is in GE format. 


.e) 


Character 


Positions 


20 


21 


22-25 


26 


27-31 


Contents 


blank 


blank 


blank 


Any GE 120/130 charac- 
ters, including blanks 


T 


blank 
nnnn; decimal; right~- 


justified; leading 
zeros may be omitted 
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Use 


Indicates that the shillings por- 
tion of a sterling-currency out- 
put field is in the British 
Standards Institute format. 


Indicates that the output does 
not contain sterling-currency 
fields. 


Indicates that the pence portion 
of a sterling-currency output 
field is in printer format. 


Indicates that the pence portion 
of a sterling-currency output 
field is in GE format. 


Indicates that the pence portion 
of a sterling-currency output 
field is in the British Standards 
Institute format, 


The output does not contain 
sterling-currency fields. 


Indicates that the user wishes to 
employ European notation in 
printing numeric fields. 


Indicates standard notation. 


Not used. 


Indicates that the user has pro- 
vided a subroutine to alter the 
collating sequence for alpha- 
meric fields. 


Indicates no translation. 


Indicates, in decimal notation, 
start address of the user pro- 
gram. This address must be 
higher than the address of the 
required for the operating system 
and associated subroutines. 


Character 
Positions Contents 
blank 
32-33 blank 
34 B 
blank 
35~36 00-4F 
37 7 
blank 
38 7 
blank 
39 L 
blank 
40-45 AXXXXX 
blank 
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Use 


Indicates that the object pro- 
gram start address is to be 
assigned by RPG. 


If the user specifies an invalid 
address RPG puts out a message 
and assigns the address as des=- 
cxribed above. 


RPG assumes that the object pro- 
gram will run in the operating 
context and uses the first avail- 
able location of the operating 
environment. 


Not used. 


Indicates binary search to be 
used in table lock-up. 


Indicates that the user has not 
specified any table look-up 
operations or that binary search 
is not requested, 


Indicates punch connector used. 


Indicates that work tape 1 is a 
7 track tape. 


Indicates that work tape lis a 
9 track tape. 


Indicates that work tape 2 is a 
7 track tape. 


Indicates that work tape 2 is a 
9 track tape. 


Indicates that an APS listing is 
to be printed. 


Indicates no APS listing is to 
be printed. 


A six character alphameric name, 
conforming to APS label conven- 
tions. Names a user coded print 
subroutine, 


Indicates standard print error 
action, 


Character 


Positions 


46-72 


73-80 


Contents 


Any GE 120/130 charac- 
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Use 


Not used by RPG. May be used for 


ters, including blanks identifying text. 


AXXXXXXX 


blank 
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Up to 9 alphameric characters, 
the first of which must be 
alphabetic. No embedded bianks 
or special characters are per- 
mitted. 


Provides a program name to be 
used to identify the program and 
to load it when required. First 
four characters inserted in 
positions 73-76 of the APS 
records. 


If the user does not assign a 
name the RPG Compiler assumes 
the name to be RPGOBJ. 
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TIT, THE RPG SPECIFICATION FORMS 


GENERAL DESCRIPTION OF RPG FORMS 


The five RPG specification forms are discussed in this section in 
the sequence in which they are read by RPG. This sequence is: 


File Description Specifications 
File Extension Specifications 
Input Specifications 
Calculation Specifications 
Output-Format Specifications 


Figure 3.A shows the five specification forms. 


File description specifications form 


This form provides: 
@ a description of the input/output files; 


@ detailed information about the input/output devices used in 
the program. 


File extension specifications form 


This form provides: 
@ supplementary information about some file types used by the 


object program such as tables, chaining files, an@ Record 
Address. (RA) files. 


Input specifications forn 


This form provides: 
@ specifications for the input file or files; 


e identification information for the various types of records 
contained in each input’ file; 


@ the location of the data fields in each input record. 
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Calculation specifications foym 


This form provides: 
e@ specifications for the operations to be performed upon the 


input data; upon data obtained by previous calculation; and, 
upon table data. 


Output-format_ specifications form 


This form provides: 


@ output specifications for the type of output files to be 
produced: printed reports, summary xecords, etc. 


SPECIFICATION FORM PRESENTATION FORMAT 


Each of the five chapters which follow describes a specific source 
statement type. All material conforms to the same presentation for- 
mat. Information regarding the specifications form under discussion 
is arranged in three columns as follows: 


Columns FIELD NAME/Contents Explanation 


Under the Columns heading, numbers are shown identifying the columnar 
positions on the specifications form described in detail in the 
remaining two columns. 


Under the FIELD NAME/Contents heading, the name of the field located 
by the numbers under Columns is written in capital letters and 
underlined: 


Immediately beneath any field name written in this column is a repre- 
sentation of the contents of the named field. Capital letters, or 
the digits 0-9, represent actual entries permitted or required in 
the field. Where Contents are shown as A's, X's or n's, the user 
should understand alphabetic, alphameric or numeric entries respec- 
tively, to be selected in accordance with the rules set forth in- 
the Explanation column to the right of the corresponding Contents 
entry. 


Where any significance other than that explained above is attached 
to Contents entries, this fact is noted in the Explanation column, 


Under the Explanation heading, the significance and rules governing 


the use of the field named under the FIELD NAME/Contents heading are 
presented, 
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Examples of specifications using each form appear at the end of the 


applicable chapters. 


C. FIELDS COMMON TO RPG SPECIFICATION STATEMENTS 


Columns FIELD NAME/Contents 
1-2 PAGE 
Any GE 120/130 charac- 
ters, including blanks 
3-5 LINE 


Numeric and alphameric 
GE 120/130 characters 


III-4 


Explanation 


The intended use of this field is 
for reference and sorting. 


The pages which make up a source 
program should be numbered in 
ascending order over the entire 
set of forms. The set of foxms 
should be arranged, therefore, 
before numbering in read-in order, 
i.e., 


1. File Description Statements 
2. File Extension Statements 
3. Input Statements 

4. Calculation Statements 

5, Output-Format Statements. 


The intended use of this field is 
to complete the sequencing field 
for ensuring that statements are 
in the proper order for processing. 


Forms for statements have line 
numbers preprinted in columns 3 
and 4, Column 5 can be used to 
complete entries, leaving gaps for 
inserts, 


No use is made of this field by 
RPG. However, when an out of 
sequence condition is encountered 
in reading the source cards an S$ 
is printed to the left of the 
source statement on the output 
listing. 


oO 


Columns 


FIELD NAME/Contents 


6 FORM TYPE 


blank 


7 COMMENTS INDICATOR 


* 


75-80 


Any GE 120/130 charac— 
ters, including blanks 
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Explanation 


Each form has an appropriate type- 
code preprinted in column 6. This 
code must be punched into all spe— 
cification forms. 


The form type-codes are as follows 
File Description Specifications 
File Extension Specifications 
Input Specifications 

Calculation Specifications 
Output-Format Specifications 


Used in conjunction with column 7 
to identify a comments card (see 
below). 


An asterisk symbol (*) is entered 
in column 7 to identify explana- 
tory text which should be inserted 
in the program listing to improve 
understanding and identify pro- 
cesses, end of statement groups, 
etc. 


Any GE 120/130 graphic characters 
may appear from column 8 to column 
74 on a comments card, identified 
by the asterisk in column 7. 


An entry here serves to identify a 
program or a section of some large 
program, 


These positions are not used by 
RPG. 
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IV. THE FILE DESCRIPTION SPECIFICATIONS FORM 


A. PURPOSE AND _USE 


Each file used in the object program must be defined in one line of 
a File Deseription Specifications form, i.e., in one Pile Descrip- 
tion statement. The Pile Description statement serves to: 


provide a name for each file for use in referencing it in 
Input and/or Output statements 


associate each filename with a specific input and/or output 
device 


indicate whether the file is to serve as an input file, an 
output file, or both 


specify the type of sequence checking, i.e., ascending or 
descending, that is to be done for any input or combined 
files that are to be sequence-checked 


indicate which input data file is the critical one for 
terminating processing if there are multiple input files 


specify organization characteristics of data contained in 
the files 


specify the mode of processing of the files 

indicate that the file type (chaining, Record Address, or 
table) requires that further information be given in a File 
Extension statement 


provide further information about the provisions for over- 
flow axeas for dise files 


indicate how file labels are to be processed. 


The File Description Specifications form is pictured below in 


Pigure 4.A. 
IM Soues REPORT PROGRAM GENERATOR FRE DESCRIPTION SPECIFICATIONS 
ea GE 120/430 
_— —y — | I] AH is ras} nevane 


FIGURE 4.A THE FILE DESCRIPTION SPECIFICATIONS FORM 
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B. FORMAT AND CONTENT OF FILE DESCRIPTION SPECIFICATIONS 


Columns 


7-14 


FIELD NAME/Contents 


FILENAME 


AXXXXXXX 


PILE 


I 


TYPE 


IV-2 


Explanation 


Up to 8-character, alphameric 
entry, left-justified, the first 
six characters of which form a 
unique name. The first character 
must be alphabetic; no embedded 
blanks or special characters are 
permitted. 


This filename entry identifies a 
file for processing. The filename 
which appears here must correspond 
to a filename entry in one of the 
following: 


e@ Input Statement - (input data 
file) 

@ Output Statement - (output 
data file) 

© File Extension Statement - 
(tables, Record Address files, 
chaining files). 


NOTE: The maximum number of files 
that can be processed in the 
program is 10, 


Identifies a file as an input 
file; may be a table file, a 
Record Address (RA) file, or a 
file containing input records for 
reading only. 


Identifies a file as an output 
file; may be an updated table 
which is to be printed, punched 
or written. This entry is not 
permitted for randomly organized 
files. 


Identifies a file as an update 
file; this entry is valid for dise 
files only. 


Columns 


16 
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FIELD NAME/Contents 


FILE DESIGNATION 


P 
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Explanation 


An update file is beth an input 
and output file. It is described 
like an input file in an Input 
Specification statement. Fields 
to be updated are described in 
Output statements. 


RULES for updating: 


1. A file is considered an update 
file if the object program 
alters the data in one or more 
fields of each record con- 
tained in the file, without 
changing: 


@ the location of the field 

@ the length of the field 

@ the nature of the field 
content. 


2. A chained file may be updated 
at detail time or total time. 
All other disc files may be 
updated only at detail time. 


Identifies a combined file. 
A combined file is a card file 
containing cards that are read 
into the system and cards that are 
used for punching. 
Punching may be done: 

e in cards already containing 


input data 
e@ in blank cards, 


Identifies the file as primary. 
RULES for primary files: 


1. only one primary file may be 
defined. 


2. A primary file is always an 
input file. 


Columns 


FIELD NAME/Contents 


blank 
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Explanation 


3. %In programs not using matching 
fields, the primary file 
should be the first file, 
excluding chained files, that 
is specified on the Input 
Specifications form. 


4. In programs using matching 
fields, the primary file should 
be the first file on the Input 
Specifications form that is 
specified with matching fields. 


Identifies the file as secondary. 


Identifies the file as an input 
table file. 


Identifies a Record Address (RA) 
file related to a direct access 
storage file. 


Record Address files are specified 
in File Description and File Exten~ 
sion statements, never, in Input 
and Output specifications. Only 
one Record Address file may be 
defined, 


Identifies the file as a chained 
file. 


Records and fields for chained 
files are specified in a manner 
similar to that used for primary 
and secondaxy files on the Input 
Specifications form, except that 
the following are invalid for 
chained files: 


e@ matching field specifications 
@ control field specifications 
e@ nuwneric sequence records. 


Field must be blank if the file is 
specified as an output file (0 in 
column 15). 


Columns 


17 
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FIELD NAME/Contents 


END OF PILE 


1-5 


Explanation 


RULES: 


1. There must be a primary file 
specified. 


2. Only one RA file is allowed for 
a given RPG program. 


3. RA files are processed sequen- 
tially and mst have sequential 
organization. 


4. The priority of multiple input 
files is determined by the 
sequence in which they are 
referenced in the Input State- 
ments. 


S. A single record in a chaining 
file may contain specifications 
for up to nine chaining fields. 
Each chaining field relates the 
chaining file to another 
chained file. 


6. For multiple input files 
(primary and secondary files 
are specified), matching 
should be specified. 


Indicates that an End-of-Job is to 
be specified when an end-of-file 
condition is reached for the file 
being specified. 


Valid for: Primary Input 
Secondary Input 
Record Address Files 


Invalid for: Output files 
Table files 
Piles processed in 
random mode. 
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Columns FIELD NAME/Contents 

18 SEQUENCE 
A 
D 
blank 

19 FILE FORMAT 
F 
Vv 

20-23 BLOCK LENGTH 


nnnn 


Iy-6 


Explanation 
RULES: 


1. For multiple input files, End- 
of-Job occurs when all input 
files for which an E is speci- 
fied have been processed. 


2. If the position is blank for 
all input files, the End~of- 
Job condition occurs when all 
primary and/or secondary input 
files have been processed. 


Indicates that matching fields (as 
specified in columns 61-62 of the 
Input statement) are in ascending 
sequence. 


Indicates that matching fields (as 
specified in columns 61-62 of the 
Input statement) are in descending 
sequence. 


Indicates no matching field speci- 
fication used. If blank when 
matching specifications are used, 
ascending order is assumed. 


Indicates the records in the file 
are fixed length. 


Indicates the records in the file 
are variable length. 


NOTE: No specification is required 
for files which use the 
printer or card devices. 


Up to 4 numeric digits, xright- 
justified. Leading zeros may be 
omitted. 


Provides the length of a physical 
record. 


Columns 


24-27 


28 
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FIELD _NAME/Contents 


RECORD LENGTH 


noon 


MODE OF PROCESSING 


blank 
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Explanation 


Up to 4 numeric digits, right- 
justified. Leading zeros may be 
omitted. 


Provides the length of a logical 
record. 


RULES: 


1. If no entries are made for card 
files, 80 is assumed for block 
and record lengths. 


2. If no entry is made for printer 
files, a 104 character line is 
assumed, Shorter line specifi- 
cations save core and should 
therefore be used when appli-~ 
cable. 


3. The user is responsible for 
compatibility of his print line 
length with the characteristics 
of the printer he is using. 


4. ‘he user is responsible for 
conformance between the struc- 
ture of his files and appli- 
cable EIOS requirements. 


Indicates that the file is to be 
processed sequentially. 


Where the file being described is 
sequentially organized (blank in 
column 32), the TYPE OF RECORD 
ADDRESS field is not applicable, 
and is left blank. 


Sequential processing of indexed- 
sequential files is also permitted. 


Columns 
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FIELD NAME/Contents 
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Explanation 


Indicates that the file is to be 
processed sequentially within 
limits; valid only for indexed- 
sequential files. 


For indexed-sequential files pro- 
cessed within limits a Record 
Address File is used to supply the 
limits. 


Indicates that the file is to be 
processed randomly; valid for all 
disc files. 


RULES for random processing: 


1, Random processing of indexed- 
sequential files may be imple- 
mented either through the use 
of chaining files, or by means 
of a Record Address file (where 
the record addresses are 
actually keys). 


2. Four address methods are possi~- 
ble for random files, They 
are: 


e by absolute addresses (I 
in TYPE OF RECORD ADDRESS, 
column 31) 

e by keys and page addresses 
(P in TYPE OF RECORD 
ADDRESS, column 31) 

e by keys and track addresses 
{K in TYPE OF RECORD 
ADDRESS, column 31) 

@ by keys and track addresses 
with multiple search (M in 
TYPE OF RECORD ADDRESS, 
column 31). (See Figure 
4.C.) 
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Columns FIELD _NAME/Contents Explanation 


29-30 . LENGTH OF KEY FIELD 
OR 
RECORD ADDRESS FIELD 


“an One or two numeric digits, right- 
justified, from 0 to 99 in value. 
Leading zeros may be omitted. 


Provides the length of a key 
field or a Record Address file 
entry. 


Record Address file (file organiza- 
tion T) entries for absolute 
addresses are assumed to be 8 
digits long. 


@ The address is 
VPPPPPNN (absolute) 
where V is the volume number, 
PPPPP is the page address, 
and 


NN is the order number of 
the record within the page. 


31 TYPE OF RECORD ADDRESS 


Kk Indicates the file is to be pro- 
cessed by keys and track addresses; 
valid for all indexed-sequential 
and random disc files. 


T Indicates address type for process- 
ing is absolute address; valid for 
random files. 


M Indicates the file is to be pro- 
cessed by keys and track addresses 
with search through the volume; 
valid for random files. 


P Indicates the file is to be pro- 


cessed by keys and page addresses; + 
valid for random files. 


NV-9 


Columns 


32 


33-34 


35-38 
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FIELD NAME/Contents 


TYPE OF FILE 
ORGANIZATION 


blank 


OVERFLOW INDICATOR 


OF 


blank 


KEY FIELD STARTING 
LOCATION 


mnnn 


1-10 


Explanation 


indicates that the file to be 
created or processed has a sequen~ 
tial organization. 


Indicates that the file to be 


processed has an indexed 
sequential organization. 


Indicates that the file to be 
processed has a direct (random) 
organization. 


Indicates that the file to be pro- 
cessed is a Record Address file 
containing absolute addresses. 


See Figure 4.B for valid entries in 
the File Organization, Processing 
and Addressing columns. 


Indicator OF is to be turned on in 
the event of overflow on a printer 
file only. This permits Calcula- 
tion and Output-Format statements 
conditioned by the OF indicator to 
be performed. 


Is used as OF above for a second 
printer file on dual carriage 
printers. 


No overflow indicator is provided. 


One to four numeric digits, right- 
justified. 


Leading zeros may be omitted. 


Provides the starting position 
within the record of a key field. 


Valid for disc files only. 


Rev. March 1970 


Columns 


39 


40-46 


47-52 


47 


48 


FIELD NAME/Contents 
EXTENSION CODE 


E 


DEVICE 


one of the following 
alphameric entries is 
selected for the file 
being described 


Indicates that further information 
for the file is provided in the 
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Explanation 


File Extension Statement. 


Must be present for: 


Table files 
Chaining files 
RA files. 


READ 
PUNCHOL 
PUNCHO3 
CRP 
PRINTER 
TAPE 


DISC1é0 


SYMBOLIC DEVICE 


numeric digit from 1 
to 8 or letter from 
Ato H 

numeric digit from 0 
to 9 or letter from 
A to F 

same as 47 


WV-11 


Indicates Card Reader. 


Indicates Card Punch cPZ101. 


Indicates Card Punch CPz103. 


Indicates Card Reader/Punch. 


Indicates Printer. 


Indicates Magnetic Tape Handler. 


Indicates Disc Storage Unit 160. 


Indicates the primary unit number 
for a tape file. 


Indicates the primary unit number 
for a disc file. 


Provides the number of an alternate 
unit for multi-volume tape or disc 
files; may be equal to unit number 
given in column 47, 


RULES for Unit Specification: 


1, For tape and dise files a unit 
must be specified in column 47; 
47-52 are blank for card 
reader, punch and printer. 
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Columns FIELD NAME/Contents 
49-52 blank 
53 LABELS 
S or blank 
E 
N 


V-2 


Explanation 


2. When multi-volume files are 
used an alternate unit specifi- 
cation must appear in column 
48; it is the same as column 47 
in those cases where all 
columns are read from the same 
unit. 


3. No volume change routines will 
be included in an object pro~ 
gram which does not have multi- 
volume files. 


Not used. 


Indicates that file labels are 
standard. The RPG program provides 
processing for standard labels. 


Indicates that standard labels are 
followed by user labels; not valid 
for disc files. The RPG program 
provides processing for the standard 
label and an exit to the user sub- 
routine named in the NAME OF LABEL 
EXIT field (columns 54-59). 


Indicates that the file has non- 
standard labels. Input file labels 
must be processed by the user sub- 
routine named in the NAME OF LABEL 
EXIT field (columns 54-59). 

Invalid for output files and for 
disc files. 


RULES for Label Processing: 


i. RPG label processing for input 
tape and disc files consists of 
verification that the correct 
file is on line. 


2. RPG label processing for output 


files checks the expiration 
date. 


Rev. March 1970 
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Columns FIELD NAME/Contents 


NOTE: 


54-59 


60 


61 


Columns 54 through 63 contain specifications for tape files 


Explanation 


3. If more than one tape file des- 
cription yefers to the same 
Gyive the RPG object program 
checks only the label specifi- 
cation relating to the file 
description for the first 
record read or written. 


It is the responsibility of the 
user to manage these files 
within the EIOS and RPG 
requirements. 


4, his user subroutine must be 
prepared according to the rules 
for all such subroutines as 
described in the section on 
user routines. The return 

. address will be provided in 
register 7. 


5. Disc file labels must ke 
standard. 


only and must be blank for all other files. 


NAME OF LABEL EXIT 


AXXXXX 


blank 


blank 


NV-3 


Up to 6 alphameric characters, the 
first of which must be alphabetic. 
The entry must be left-justified in 
the field. 


This entry names the subprogram 
which processes a non-standard 
label ox user label. 


It must be present if column 53 
contains an E or an N. 


I€ colurn 53 contains either S or 
blank, this field is not used. 


Not used. 


Indicates unnumbered blocks in tape 
files. 


Indicates numbered blocks in tape 
files. 


Rev. Varch 1970 


a4 


a ep S1 


areas a whi 


Columns 


62 


63 
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FIELD NAME/Contents 


Explanation ; 


DENSITY : 

2 Indicates recording at 200 bpi. 

5 Indicates recording at 556 bpi. 

8 or blank Indicates recording at 900 bpi. 

Pp Indicates recording at 1600 bpi. 
Not used for card, printer and disc 
files, 

PARITY 

P Indicates even parity. 

D or blank Indicates odd parity. 


Not used for card, printer and dise 


files. 
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Columns FIELD NAME/Contents. 
64 RECORDING MODE 


NOTE: 


6S 


66 


67-68 


6 


8 or blank 


7 


9 


lxplanation 


Indicates 6 bit mode on disc. 
Indicates 8 bit mode on disc. 
Indicates 7 track mode on tape. 
Indicates 9 track mode on tape. 


Not used for card or printer files. 


Columns 65-69 must be blank for card, printer and tape file 


statements. 
VOLUMES 


n 


blank 


FILE ADDITION 


A 


blank 
OVERFLOW 


mn 


blank 


WV-5 


A numeric digit, from 1-9 in value. 
Indicates the number of volumes 
used to contain the file. 


Must be specified for random access 
files. 


Indicates the file is contained in 
one volume. 


Indicates that xecords are to be 
added to the file defined on this 
line. 


See Figure 4.B for valid specifi- 
cations using the FILE ADDITION 
feature. 


For all other file descriptions. 


Up to 2 numeric digits, from 0 to 
16 in value. Indicates the number 
of overflow cylinders provided for 
the file. 


No overflow cylinders are provided. 


Columns 


69 


70 


71-74 
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FIELD NAME/Contents 


blank 
TAPE REWIND 


N 


blank 


Any characters 
belonging to the 

GE 120/130 character 
set, including 
blanks 


Explanation 


Not used. 


Indicates that the reel(s) con- 
taining the tape file defined on 
this line should not be rewound 
when the end-of-file condition 
occurs, 


Indicates that the tape file 
defined on this line should be 
rewound and unloaded when the end- 
of-file condition occurs. 


For card, disc printer files and 
for tape files that should be 
xewound but not unloaded when the 


- end-of-file condition occurs. 


The programmer may enter comment 
text in this field; GE 120/130 RPG 
does not use this field; and 
comments written here are simply 
printed in the program listing. 
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TYPE OF FILE MODE OF TYPE OF RECORD 
ORGANIZATION PROCESSING ADDRESS 


Column 32 Column 28 Column 31 


Meaning Meaning Meaning 


(not applicable) 


sequential sequential 


indexed- sequential 
sequential 


indexed- sequential 
sequential in Limits 


keys with access 
by means of the 
index cylinder 


indexed- random 
sequential 


keys with access 
by means of the 
index cylinder 


absolute address 
with or without 
conversion 


direct random 


direct keys and track 


addresses 


keys and track 
addresses; multi- 
ple search 
requested 


direct 


keys and page 
addresses 


direct random 


sequential sequential (not applicable) 
file of 

absolute 

addresses* 


FIGURE 4.B VALID ENTRIES FOR FILE ORGANIZATION, 
MODE OF PROCESSING AND TYPE OF ADDRESS 


*absolute address files referred to here are assumed always to be the 
output of a system Sort program. 
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PILE TYPE MODE OF TYPE OF FILE FILE ADDITION RPG OBJECT 
PROCESSING ORGANIZATION PROCESSING 


‘Process the 
file and add 
new records 


Extend 
existing 


file. 


Add new 
records to 
an existing 
file 


Process 
file, update 
records and 
add new 
records 


FIGURE 4.C VALID SPECIFICATIONS USING FILE ADDITION 


NOTE: The addition of records to an indexed-sequential file does not 
imply the updating of the file index. This must be done by a 
utility program. 


*For files to be updated the record(s) to be added must be identified as 
a different record type from the record(s) to be updated - even if they 
are, in effect, the same. 
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SOME PROGRAMMING CONSIDERATIONS FOR FILE DESCRIPTIONS 


Maximum number of files 


An overall maximum of 10'files is permitted in RPG programs. The 
list below defines the maximum number of files within the several 
types of files permitted in RPG. 


Any combination of these, up to 10, is permitted. 


File Type Maximum Number 


Input 
Primary 1 (and only one); required 
Secondary 8 
RAF 1 
Chained 9 
Table 8 


Output. 9 


Update 
Primary 
Secondary 
Chained 


oor 


File updating 
Only disc files may be updated. 


A chained file may be updated at detail or total time; all other 
disc Eiles can be updated at detail time only. 


File sequence 


Normally the sequence specification is used to determine how matching 
is to be done in a multi-file program. It describes the direction of 
the comparison, i.e., ascending or descending. 


In a program with one input file only this specification can be used 
with matching field specifications (see the Input Specifications 
Form, columns 61-62) to sequence-check fields of the file. 


The Halt Indicator HO is set when an out of sequence record is 
detected in the object program. Processing then stops before the 


next record is read, unless the indicator is turned off in calcula- 
tions, 
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File format/lengths 


The RPG processor checks for internal consistency of file format and 
size specifications - e.g., that the record length is not greater 
than the block length. However, no attempt is made to verify that 
EDOS/ETOS requirements are met. Some cannot be verified but even 
those which can are the responsibility of the user. Therefore, any 
error in file structure or incompatibility between file structure and 
the specifications written for RPG will cause the object program to 
fail, The programmer must guard against erroneous specifications or 
invalidly structured files. 


Symbolic device 


RPG supports a punch; EOS does not. A single punch file is 
permitted. 


File additions 


An A in column 66 of the File Description statement indicates that 
records are to be added to a file. File additions are performed for 
random and sequential files: the processing which takes place 
depends upon the type of file. 


@ An input file (I) is processed and new records are added. 


@ An output file (0) has new records added to the existing 
ones. 


@ An update file (U) is processed, records are updated and 
mew records added. 


It is the programmer's responsibility to use this RPG specification 
properly within the rules of file processing in ETOS. 


ERROR ACTION 


In general, GE 120/130 RPG attempts to compile a source program effec-— 
tively by supplying usable values in specifications that contain 
errors. However, when an error is of a nature that makes such 

action unfeasible the erroneous specification is disregarded. 


The following errors cause a specification to be ignored in pro- 
cessing: 


© FILENAME not left-justified, equal to a previous FILENAME or 
of an invalid form ,e.g., does not begin with an alphameric 
character, contains special symhols, etc. 


@ A File Description Specification read after 10 have been 
processed, 
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More than one Record Address File specified in a program. 
(Only the first is used.) 


Indeterminate and interdependent errors in two or more of 
the following columns: FILE ORGANIZATION, MODE OF PROCESS— 
ING, TYPE OF RECORD ADDRESS. 


Indeterminate and interdependent errors in two or more of the 
following columns: FILE TYPE, PILE DESIGNATION, DEVICE. 


BLOCK LENGTH or RECORD LENGTH specification either non 
numeric or not right-justified. 


LENGTH OP KEY FIELD or RECORD ADDRESS FIELD not right- 
justified, non numeric or of invalid size with respect to 
overall record length or EDOS requirements. 


KEY FIELD STARTING LOCATION non numeric, not right-justified 
or of invalid size. 


DEVECE not valid. 


UNIT or ALTERNATE UNIT not 0-9, AF (or blank, for ALTERNATE 
UNET only). 


NAME OF LABEL EXIT not valid. 
BLOCK COUNT not N or blank. 
PARITY not valid. 

DENSITY not valid. 

RECORDING MODE not valid. 


VOLUMES not valid. 


e@ - OVERFLOW not between 1 and 16 or not right-justified. 


In casés in which a default parameter is used these are the standard 
options, e.g., a U (rewind, unload) is supplied when there is an 
invalid TAPE REWIND specification. 
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E. SOME SAMPLE FILE DESCRIPTION STATEMENTS 
3. A-primary input file on disc in fixed format 
& 100 Semtes REPORT PROGRAM GENERATOR FILE DESCRIPTION SPECIFICATIONS 
ie GE 120/130 
= ST 
welt we Fen ea 

f =i 

CNPUT— riprsciede 6 

CL 


Records will be read in ascending sequence ~- A in SEQUENCE, column 


18. 


The file has random organization - D in TYPE OF FILE ORGANIZATION, 


column 32. 


The file is on disc 2 - DISC160 in DEVICE, columns 40-46; and 2 in 
SYMBOLIC DEVICE, column 47, 


Standard labels are used - S in LABELS, column 53, 


INPUT is written in 3 bit mode - 8 in MODE, column 64. 


2.  A_secondary input file on tape 
CE 100 Series REPORT PROGRAM GENERATOR FILE DESCRIPTION SPECIFICATIONS 
A GE 120/130 
= T ‘ Baan 
sae oe FY] o 


eee 


tate 
bam 


ona ude eon snl 


i 
See — 


IASTER {T5| | Fi0105|0010) 


APE 5 
ia 


The file is in fixed 


The device is tape - 


The unit used is 3 - 3 in SYMBOLIC DEVICE, column 47. 


format - F in PILE FORMAT, column 19. 


TAPE in DEVICE, column 40. 
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The file is single volume - / in SYMBOLIC DEVICE, column 48. 


Labels are standard - S in LABELS, column 53. 


Density is 800 bpi - 8 in DENSITY, column 62. 


Parity is odd ~ D in PARITY, column 63. 


Nine track tape is used - 9 in MODE, column 64, 


The tape is to be rewound and unloaded - U in TAPE REWIND, column 70. 


3. An update file with addition 


€ 100 Series REPORT PROGRAM GENERATOR FILE DESCRIPTION SPECIFICATIONS 


GE 120/430 


~th 


TSCH 


Ht 600) 100 


The file is primary - P in FILE DESIGNATION, column 16. 


Ascending sequence is used ~ A in SEQUENCE, column 18. 


Records are fixed - P in FILE FORMAT, column 19. 


Processing is random ~ R in MODE OF PROCESSING, column 28. 


Keys are 15 characters long - 15 in LENGTH OF KEY FIELD, columns 


29~30. 


Indexed sequential organization is used ~ I in TYPE OF FILE ORGANIZA~ 


TION, COLUMN 32.. 


Eight~bit recording is used - 8 in MODE, column 64. 


Records are to be added to the file - A in FILE ADDITION, colum 66. 
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4. A record address file 

€ 100 Seues REPORT PROGRAM GENERATOR FILE DESCRIPTION SPECIFICATIONS. 
i GE 120/430 

— 

pias EEEH 


~O om. Oi 


ea | ees oe | och 
hl 
Hl i 

b+ [RADRES EAD | 


The file is an RAP, R in FILE DESIGNATION, column 16. 


Five addresses will be specified on each card ~ 40 in BLOCK LENGTH, 
columns 20-23 and 8 in RECORD LENGTH, colums 24-27, 


No conversion will be done, this is a file of absolute addresses 
produced by a system sort, T in TYPE OF FILE ORGANIZATION, column 32. 


A Pile Extension Specification is supplied for this file - E in 


EXTENSION, column 39, 


The file is read from cards, READ in DEVICE, columns 40+43, 
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V, THE FILE EXTENSION SPECIFICATIONS FORM 


A. PURPOSE AND USE 


Certain types of files - chaining files, Record Address files and 
table files - must be described by means of statements entered on the 
File Extension Specifications form. The File Extension statement 
serves to: 


@ provide the identifying number of chaining fields; 


@ identify the file referenced in chaining, Record Address or 
table file processing; 


@ provide the name of a routine to convert a Record Address 
file entry or a chaining field; 


@ provide a means for requesting that a table file be printed 
or punched; 


@ provide for a description of a table used in the program. 


The File Extension Specifications form is pictured below in Figure 
S.A. 


REPORT PROGRAM GENERATOR FILE EXTENSION SPECIFICATIONS 
F 100 Secs GE 420/236 


one " Bn nnne 


—s 


Comments 


FIGURE 5.A THE FILE EXTENSION SPECIFICATIONS FORM 


B. FORMAT AND CONTENT OF FILE EXTENSION SPECIFICATIONS 


Columns FIELD NAME/Contents Explanation 
7-8 RECORD SEQUENCE 
AA The two-character alphabetic or 
numeric sequence indicator asso- 
nn ciated with this chaining file in 


columns 15-16 of the Input Specifi~ 
eations form. 


blank For all files other than chaining 
files. 
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Col: “ns FIELD NAME/Contents Explanation 


9-10 NUMBER OF THE CHAINING 


The identifying number of a chain- 
ing field, as entered in columns 
61-62 of an Input Specifications 
statement; valid for chaining files 


only. 
blank For all files other than chaining 
files. 
11-18 FROM_FILENANE 
AXXXXKXX .Up to 8-character alphameric entry, 


left-justified, the first six 
characters must form a unique name. 
The first character must be alpha- 
betic; no embedded blanks or 
special characters are permitted. 


This filename entry identifies the 
chaining file, Record Address file 
or table file being described. It 
is used in conjunction with the TO 
FILENAME (see below) to identify a 
relationship between two files. 
This relationship may be: 


® chaining file to chained file; 

@ Record Address file to data 
file; 

@ table file for write out. 


Therefore, this field may specify: 


@ a chaining file; the name being 

~~ faken from positions 7712 of 
the associated File bescription 
statement; -—7" 

® a RecoraAddress file; 

® a table file. 


\-2 


Columns 
19-26 TO FILENAME 
AXXXXXXK 
blank 
NOTE: 


27-32 
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FIELD NAME/Contents 


Explanation 


Identifies the second file of a 
related pair, according to the 
rules described above. 


Therefore, the file named here may 
be: 


@ a chained file; the name of 
the’ file from which a data 
record is obtained, as that 
name appears in columns 7-14 
of the associated File Des- 
eription statement; 

@ a data file from which records 
are to be obtained by means of 
a Record Address file; 

@ a table file which is to he 
written, punched or printed. 


For a table file which is not to be 
written out. 


Columns 27-57 are used to describe table files. 


TABLE NAME 


TABXXX 


AXXXXX 


V-3 


From 4 to 6 alphameric characters, 
the first three of which must 
always be TAB. The entry is left- 
justified in the field. 


The TABLE NAME entry identifies 
either a table of arguments, or a 
table of functions. 


When the table records being des- 
cribed contain entries of only one 
table, the name of the table is 
entered here. 


Up to 6-character alphameric entry, 
left-justified, unique. The first 
character must be alphabetic, no 
embedded blanks ox special charac- 
ters are permitted. 


Provides the label of an Address 
Conversion, Routine for RAF or 


chaining files. 
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Columns FIELD NAME/Contents 


33-35 NUMBER OF TABLE 
ENTRIES/RECORD 


mon 


36-39 NUMBER OF TABLE 
ENTRIES/TABLE 


mann 


40-42 LENGTH OF TABLE ENTRY 


non 


43 PACKED 


blank 


y-4 


Explanation 


Up to three numeric digits, right- 
justified; leading zeros may be 
omitted. 


Specifies the maximum number of 
table entries - either arguments or 
functions - contained in each input 
record. 


Up to four numeric digits, right- 
justified; leading zeros may be 
omitted. 


Specifies the number of entries 
contained in the table. 


Up to three numeric digits, xight- 
justified; leading zeros may be 
omitted. 


Specifies the length of each table 
entry. 


RULES : 


1. The maximum length for alpha- 
meric table entries is 256 
characters. 


2. The maximum length for numeric 
table entries is 15 numeric 
digits. 


Indicates that the data in the 
table is in the packed decimal 
format. 


For all other specifications. 
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Columns FIELD NAME/Contents Explanation 
44 DECIMAL POSITIONS 
OorN Indicates that decimal data con- 


tained in the table is in integer 
form, i.e., does not have any 
decimal places. 


1-9 Indicates the number of decimal 
places in numeric table data which 
has decimal positions. 


blank For tables containing alphameric 
data. 


45 SEQUENCE 


A Indicates that the data in the 
table is in ascending sequence. 


D Indicates that the data in the 
table is in descending sequence. 


blank Indicates that the data in the 
table is neither in ascending nor 
in descending sequence. This 
column may also be left blank if 
the sequence specification is not 
required. 


NOTE: The information in columns 46-57 is required only if a table 
file being described consists of alternating arguments and 
functions. 


46-51 TASLE NAME 


TABXXX From 4 to 6 alphameric characters, 
the first three of which must Se 
always be TAB. ‘he entry is left- 
justified in the field. 


This TABLE NAME entry identifies 
the second table if two table names 
are used (for alternating arguments 
and functions only). 


\-5 


Columns 


52-54 


55 


56 


57 
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FIELD NAME/Contents 


LENGTH OF TABLE ENTRY 


non 


blank 


DECIMAL POSITIONS 


oor N 


1-9 


blank 


Explanation 


Up to three numeric digits, right~ 
justified; leading zeros may be 
omitted. 


Specifies the length of each table 
entry. 


RULES: 


1. The maximum length for alpha- 
meric table entries is 256 
characters. 


2. The maximum length for numeric 
table entries is 15 numeric 
digits. 


Indicates that the data in the table 
is in the packed decimal format, 


For all other specifications. 


Indicates that decimal data con- 
tained in the table is in integer 
form, i.e., does not have any 
decimal places. 


Indicates the number of decimal 
places in numeric table data which 
has decimal positions. 


For tables containing alphameric 
data. 


Indicates that the data in the 
table is in ascending sequence. 


Indicates that the data in the 
table is in descending sequence. 
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Columns FIELD NAME/Contents Explanation 
blank Indicates that the data in the 


table is neither in ascending nor 
in descending sequence. This 

column may also be left blank if 
the sequence specification is not 


required. 
58-74 COMMENTS 
Any characters The programmer may enter comment 
helonging to the text’ in this field; gz 120/130 RPG 
GE 120/130 character does not use this field, and comments 
set, including * written here are simply printed on 
blanks the program listing. 


SOME PROGRAMMING CONSIDERATIONS FOR FILE EXTENSIONS 


RA files 


An RA file is always described on a File Extension statement. All RA 
files except those identified on the File Description specification 
as having organization format T (column 32) must be converted for use. 
The name of the conversion routine appears in the TABLE NAME positions 
of the File Extension. 


An RA file is not described on Input Specifications therefore'a field 
for the RAF record is made available by RPG, RAF entries are made 
available consecutively in a field called CONTD. ‘The length of CONTD 
is the record length specified in Columns 29-30 of the File Descrip- 
tion specification. CONTD is alphameric. 


Chaining files 


A chaining field may or may not require conversion. When conversion 
is to be performed for a chaining file the name of the conversion 
routine is entered in positions 27-32 (TABLE NAME) of the File 
Extension specification. 
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oF 


Table files 


A table file may contain functions only or functions and arguments. 


ERROR_ACTION 


In general, GE 120/130 RPG attempts to compile a source program effec- 
tively by supplying usable values in specifications that contain 
errors. However, when an error is of a nature that makes such 

action unfeasible the erroneous specification is disregarded. 


The following errors cause a specification to be ignored in process- 
ing: 


@ A file specified in FROM FILENAME (columns 112-18) has not 
been specified as a chaining file on the Pile Description 
form. 


@ RECORD SEQUENCE OF A CHAINING FILE (columns 7-8) is not 
either numeric or alphabetic but alphameric. 


@ NUMBER OF CHAINING FIELD (columns 9-10) does not contain a 
¢ in column 9 or a number from 1-9 in column 10, 


e@ A file specified in TO FILENAME (columns 19-26) has not been 
specified as a primary or secondary file in association with 
an RA file. 


@ A file specified in TO FILENAME (columns 19-26) has not been 
specified as chained in association with a chaining file. 


@ 0 FILENAME is missing from an RA file or a chaining file 
specification. 


e@ TABLE NAME (columns 27-32 or 46-51) is missing or not left~ 
justified. 


@ TABLE NAME (columns 27-32) has been multi-defined. 


@ The numeric specifications (colums 33-42, 52-54) of a Table 
File are missing, or right-justified or not numeric, 
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E. SOME SAMPLE FILE EXTENSION SPECIFICATIONS 
1. Alternating tables 


REPORT PLOGRAM GENERATOR — FILE EXTENSION SPECIFICATIONS 


GE 120/130 
[== EH (ws. COO 
ie 
ma Sera | eas 
To pleame | jis elie] cee |” (ib oi 
i eee li 
+t ITABONE! 10] £50] 40] lolAlTABtwol 5) (0) 
Biv ie 


The file TABLES contains two tables TABONE in TABLE NAME, columns 
27-32 and TABTWO in TABLE NAME, columns 46-51. 


Both tables have 150 entries - #150 in NUMBER OF TABLE ENTRIES PER 
TABLE, columns 36-39, 


Entries in TABONE are 10 characters long - ¥10 in LENGTH OF TABLE 
ENTRY, columns 40-42, 


Entries in TABTWO are 5 characters long - #5 in LENGTH OF TABLE 
ENTRY, columns 52-54, 


Both tables are integers - Q@ in DECIMAL POSITIONS, columns 44 and 56 
and are in ascending sequence = A in SEQUENCE, columns 45 and 57. 


2. Table file for output 


REPORT PROGRAM GENERATOR FILE EXTENSION SPECIFICATIONS 
oe GE820/130 
— 
ar pres on 
ponies Pe ete of 
& Table 
um | From fllenome | To filename | Nome 
onog ITIAIBILIE'S: pera ITABONE! 4.0] 200] 20 
gga0 LLL 7 am 


The file TABLES which contains an argument table named TABONE - in 
TABLE NAME, columns 27-32 is to be written on the output file 
UPTAB - in TO FILENAME, columns 19-26. 
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3. A chaining file 
: REPORT PROGRAM GENERATOR FILE EXTENSION SPECIFICATIONS 
a ade GE 120/130 
oo3 me nae me 
septa 
To filename | pene Evang AR Comments 
5 
h| i i 
(Re Oe ee Te See Oe iy | H 
CLICHNIING | [CHNED | ICNVAT 
Ho Ac 


CHNING = in FROM FILENAME, columns 11-18 is a file containing a 
record key that will be used to process the file CHNED - in TO 
FILENAME, columns 19-26. 


There is a field in CHNING which chains or links it to CHNED, Thus 
CHNING is the chaining file and CHNED the chained file. 


The field in CHNING which links the files is Cl - Cl in NUMBER OF THE 
CHAINING FIELD, columns 9-10. 


The field used to link the files must be converted by the routine 
CNVRT - in TABLE NAMES, columns 27-32. 


The record sequence — AA in RECORD SEQUENCE OF THE CHAINING FILE, 
columns 7-8 is repeated on the Input Specifications sheet from which 
it is taken. 


4. Record address file 
&, REPORT PROGRAM GENERATOR FILE EXTENSION SPECIFICATIONS 
te dO aes GE 420/130 
to = . nnwanes 
(== mE] ae [ 
Toble | 
he From Filename | To filename Nome 4 LE] ‘Comments 
HH} oy Hl 
g Fl LIRAFLUST, [MASTER [Cvap |. | ann 
COMO NN ean ee : r TT 


FROM FILENAME, columns 11-18, contains the name of the Record Address 
File, RAFLST. 


RAPLST is used to address the MASTER file, entered in TO FILENAME, 
columns 19-26. 


Entries from RAFLST are converted for use by means of the subroutine 
CVAD named in TABLE NAME, columns 27-32. 
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VI, THE INPUT SPECIFICATIONS FORM 


PURPOSE AND USE 


The specifications entered on the Input Specifications form provide 
two major categories of information about the input files: 


e@ Record Identification (columns 7-42), and 
e@ Field Description (columns 43-74). 


A Record Identification entry identifies the input record (or records) 
of a file by specifying identifying codes contained in the record(s). 
The relationship between records of multi-record files is also estab- 
lished by means of a Record Identification field entry. Every RPG 
Program must contain at least one Record Identification entry per 
input file. 


Field Description entries describe the fields of the input records 
identified in columns 7-42 of the Input Specifications form, Each 
field is described on a separate line below its corresponding Record 
Identification entry. 


The complete Input statement, comprised of Record Identification and 
Field Description portions, serves to: 


allow for sequence specifications 

describe, in a general way, the makeup of the input files 
provide check information for controlling the processing 
identify records 

identify and locate specific fields in input records 
describe the characteristics of fields in input records 
indicate the sign position for sterling-currency fields. 


The Input Specifications form and its major subdivision into Record 
Identification and Field Description entry areas, is pictured below 
in Figure 6.A. 


GE 100 Series REPORT PROGRAM GENERATOR INPUT SPECIFICATIONS 
GE 120/430 
pepe one nena 


ion : 


rewene 


ied en | 


we |] rtnome J z 
resiton | | |} Peston 


ee 


Lo, 


SF 


Tiers 


FIGURE 6.A THE INPUT SPECIFICATIONS FORM 
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B. FORMAT AND CONTENT OF THE INPUT SPECIFICATIONS 


Columns 


7-14 


15-16 


FIELD NAME/Contents 


FILENAME: 


AXXXXXXX 


SEQUENCE 


AA 


An 


Explanation 


Up to 8-character alphameric entry, 
left-justified; the first six char- 
acters must form a unique name. 

The first character must be alpha- 
betic; no embedded blanks or special 
characters are permitted. 


This entry provides the name of an 
input file. It must be the same as 
the name entered for this file in 
the FILENAME field (columns 7-14) 
of the File Description Specifica- 
tions form. 


RULES: 


1. Each input file must be assigned 
a name, 


2. A filename must be specified 
only with the first record 
identification line of the 
associated file. If more than 
one record is identified in 
subsequent lines, the same 
filename is assumed for them as 
for the first record identifi- 
cation line. 


Indicates: either that the input 
records are not in a predetermined 
sequence, or that records identified 
by alphameric sequence are always 
to be considered in sequence. 


Indicates that the input records 
are expected to be in some prede- 
termined sequence and that it is 
desired to process them in that 
sequence. 
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Columns FIELD NAME/Contents Explanation 
RULES for numeric sequence code 
entries: 


1. The entries for checking a pre- 
determined sequence must start 
with 01 and continue in ascend- 
ing order (e.g., 02, 03 etc.) 


2, When input records do not appear 
in the predetermined sequence, 
the HO indicator is set on. 


3. &If a sequence entry (numeric) 
is assigned here, added infor- 
mation regarding its use must 
appear in column 17. 


4. Header cards or other cards 
that are not in sequence must 
be specified on the Input 
Specifications form prior to 
any specifications for sequence 
checking. 


Therefore, alphabetic record 
sequence types appear first, 
followed by numeric sequence 


types within any one given * ih 


f file. if 
7 NUMBER i 

1 Indicates that one and only one 
record of a type must be present in 
a group. 

N Indicates that one or more records 
of a type may be present in a group. 

blank For non=-sequential records. 


Indicates that the records do not 
appear in a predetermined sequence, 


When numeric sequencing is speci- 
fied in columns 15 and 16, there 
must be an entry in column 17, 


VI-3 


Columns 


18 


19-20 


FIELD NAME/Contents 


OPTION 


° 


blank 


RESULTING INDICATOR 


nn 
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Explanation 


Indicates that the presence of a 
xecord is optional. 


Indicates that the xecord must be 
present. 


RULES: 


i. At least one record type must 
be required. 


2. This specification must be 


blank for non-sequential 
records, 


Two numeric digits, uniquely asso- 


ciated with the record described on 


this line of the Input Specifica-~ 
tions form, ‘The indicator thus 
established is turned on in the 
object program each time the asgo- 
ciated input xecord is present. 


NOTES: 


1. A resulting indicator mst be 
specified for each record type. 


2. The object program may test for 
a resulting indicator during 
the processing of 


@ calculation specifications, 


and 
@ output~format specifica- 
tions. 


3. Specifically, the resulting 
indicator established here for 
an input recora is turned on 
when the identifying elements 
of that record, as specified in 
the Record Identification block 
{columns 21-41), are found 
present during the object pro- 
gram. Thus, the programmer may 
test for the presence of any 
input record by interrogating 
the resulting indicator asso- 
ciated with that xecord, rather 
than by repeated tests of 
identifying elements within 
that record. 


Columns 


“NOTE s 


21-24 
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FIELD NAME/Contents 


Explanation 


The codes 01-99 can be assigned 


-to any one of three types of 


indicators recognized in the RPG 
program (see the discussion 
further on in this chapter of 
columns 65-70 of the Input 
Specifications form, and of 
resulting indicators, columns 
54-59, of the Calculation 
Specifications form). Different 
types of indicators with the 
same code are considered to be 
the same indicator. Therefore 
care should be taken when 
assigning the same code to 
different types of indicators. 


" The numeric value of a result- 


ing indicator is not signifi- 
cant; resulting indicators for 
several records within a single 
input file, therefore, need not 
be assigned in any particular 
numeric sequence. 


Resulting indicators are turned 
on and off during the process- 
ing of the object program, as 
the various record types are 
read, However, only the result- 
ing indicator for one specified 
record type can be on at a time. 
When a resulting indicator is 
turned on, all other record 
resulting indicators are turned 
off. This does not apply to 
resulting.indicators for chained 
and chaining records or when 
resulting indicators are set on 
during calculations. 


Information in 21-27} 28-34 and 35-41 provides three distinct 
sets of record identifiers. 


POSITION 


monn 


VIS 


Up to four numeric digits, right- 
adjusted. Leading zeros may be 
omitted. 


Provides the number of the position 
in a record type that containg the 
code used for identifying the 
record. 


Columns 


25 


26 


27 


‘PB-32 ° 
32 
43 
34 
18-39 
39 
40 
41 
42 


FIELD NAME/Contents 
not 


N 


C/2/D 


Cc or blank 


CHARACTER 

Any one of the 64 
characters in the 

GE 120/130 graphic set 
See 21-24 

See 25 

See 26 

See 27 

See 21-24 

See 25 


See 26 


See 27 


” STACKER SELECT 


blank 
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Explanation 


indicates that the record is to be 
identified by the absence of the 
code (not present) to be described 
in columns 26 and 27. 


Indicates that the comparison of 
the code (in column 27) is to be 
on the entire character. 


Indicates that the comparison of 
the code {in column 27) is to be 
on zone only. 


Indicates that the comparison of 
the code (in column 27) is to be 
on the digit portion only, 


Provides the character to be used 
for record identification. 


Indicates that input cards are to 
be selected to the normal stacker 
(Input cards are fed out into 
stacker 1; punched cards are fed 


vout into stacker 2 as normal 
‘stacke: =}. 


aevellarch 1970 


Columns 


43 


44-47 


48-51 


FIELD NAME/Contents 


FIELD LOCATION: 


nnnn 


FROM 


TO 


PIELD LOCATION: 


mann 
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Explanation 


Indicates that input cards are to 
be selected to stacker 3. This 
option is valid for the card readex/ 
punch only. 


RULE: 


Input cards that are to be punched 
during the execution of the program 
must have stacker selection speci- 
fied in the input specification. 


Indicates that the numeric input 
field is in packed decimal format. 


Indicates that the input is in 
unpacked decimal format. 


NOTE: If this column is blank, 
indicating unpacked format, 
the RPG program automatically 
converts numeric input data 
from unpacked format to 
packed format. The appear- 
ance of the letter P in this 
column causes the RPG program 
to bypass the conversion. 


Up to 4 numeric digits, right- 
justified in the field. Leading 
zeros may be omitted. 


This entry specifies the leftmost 
(i.e., the high order) position of 
the field within the record; the 
FROM location. 


Up to 4 numeric digits, right- 
justified in the field. Leading 
zeros may be omitted. a 


This entry specifies the rightmost ~N 
(i.e., the low order) position of 

the field within the record; the TO 
location. 


Columns 


52 


FI£LD _NAME/Contents 


DECIMAL PLACES 


Q or N 


biank 
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Explanation 


RULES: 


1. ‘The maximum length of an 
unpacked numeric field, as 
defined by the entries in the 
FROM and TO fields of the 
FIELD LOCATION columns, is 15 
digits; 8 is the maximum for 
packed form. 


2. The maximum length of an alpha- 
meric field, as defined by the 
entries in the FROM and TO 
fields of the FIELD LOCATION 
columns is 256 characters. 


Indicates no decimal places are 
present in the associated numeric 
field. 


Indicates the number of decimal 
places present in the associated 
numeric field. 


indicates that the associated 
field is not numeric. 


RULES: 


1. Any entry other than blank 
(i.e., 0 through 9 or N) 
defines the associated field 
as a numeric field. 


2, Each entry is used as a means 
of determining the number of 
decimal positions contained in 
the field specified in the 
field location entry. 


3. Each entry in this column causes 
the associated field to be 
placed in store in packed 
decimal format, i.e., all zones 
are lost during conversion 
except the zone over the units 
(rightmost) position. The 
rightmost position is inter- 
preted as a sign. 


Columns 


53-58 


FIELD NAME/Contents 


FIELD NAME 


AXXXXX 


VI-9 


GE 120/130 RPG USER'S GUIDE 
PHE INPUT SPECIFICATIONS FORM 


Explanation 


4. Each entry in this column causes 
all zones of the field specified 
in the field location entry to 
be ignored during comparisons 
caused by a control level or 
matching fields specification. 


S. An entry must be made for 
decimal places if a P appears 
in column 43 or if the field is 
to be used in arithmetic or 
editing operations. 


Up to 6-character alphameric entry, 
left-justified, the first character 
of which must be alphabetic. No 
embedded blanks or special charac— 
ters are permitted, 


Assigns a name to the field being 
defined. The name assigned in this 
field is used to refer to the field 
in Calculation and/or Output-Format 
statements, 


RULES: 


1. The same field name may be used 
for any number of fields of 
different records provided that 
all these fields have the same 
length and the same number of 
decimal places as the first 
field so named. 


2. A field name is assigned only 
once by RPG. The same storage 
location is used for fields 
with identical names. 


3. Field names PAGE and PAGE] are 
used for page numbering. 


4. The letters ALTSEQ are not per- 
mitted as a field name when the 
alternating collating sequence 
is used. 


Columns 


FIELD NAME/Contents 
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Explanation 


5. The letters IN are used as a 
prefix for references to indi- 
cators. Indicator fields are 
named INIA, INHd, INMR, INOF, 
INOV, INLR, IN1P or Indd, where 
d refers to a numeric digit. 


6. CONTD is the name of the field 
used to contain a Record 
Address File Entry. 


RULES for Field Specification: 


1, The fields of a record need not 
be specified in the physical 
order of their occurrence 
within the record; theix 
sequence is determined by RPG 
on the basis of entries made in 
the FROM and TO fields of the 
FIELD LOCATION columns. 


2. One set of specifications may 
be used to describe fields that 
are contained in the same loca- 
tions in two or more different 
records. 


Whis is accomplished by entering 
OR in columns 14-15, Columns 16 
to 18 must be blank for this use. 


The meaning attached to such'a 
specification (OR relationship 
or xecords) is that the fields 
being defined are contained in 
records having either the record 
identification specified in the 
first statement OR that speci- 
fied in the second. 


3. The same physical field from an 
input record may be used as 
both an alphameric and a numeric 
field. 


This is accomplished by defining 
the field twice, i.e., by 
assigning two different field 
names to the same location, 
leaving a blank in column 52 

for one definition and entering 
0, Nor 1-9, as required, in 
column 52 for the second. 


Columns 


FIELD _NAME/Contents 
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Explanation 


Data fields with the same field 
name may be defined as packed 
and unpacked numeric fields 
alternately. 


When fields with the same name 
are specified in packed and 
unpacked decimal format alter- 
nately, the packed length of the 
unpacked fields must be the 
same as the number of digits of 
the packed field. 


The number of digits of a packed 
field is calculated by RPG as 
2n-1 where n is the number of 
record positions used. 


Constant data may be entered by 
defining a special record type 
in an input file and by assign- 
ing a field name not otherwise 
used. Constant information may 
be run-dependent data like the 
page number or the date or may 
be constants that are too large 
to be specified as literals in 
the source program. 


3An additional card file to con- 
tain constant data cards must 
be specified for programs which 
process only tape and/or dise 
files, Such an additional card 
file must be specified as 
follows: 


a. As a secondary file’ without 
matching fields if the pro- 
gram uses multiple files 
and matching fields. This 
ensures that the additional 
card file will be processed 
immediately as the cards 
are read. 


b. As a primary file in pro- 
gzvams that do not use the 
matching technique (e.g., 
programs that would ordinar- 
ily be single file programs) 
er programs which use the 
chaining technique. 


Columns 


59-60 


FIELD NAME/Contents 


LEVEL 


L1-L9 
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Explanation 


Assigns a control indicator to the 
field to specify the processing 
pattern to be determined by this 
field. 


RULES for Specifying Control Fields: 


1. 


4, 


The control indicator is used in 
a manner similar to the resuiting 
indicator to condition calcula- 
tions and output. 


Up to nine control levels can 
be used; level 1 is the lowest 
control level; level 9 is the 
highest. 


A field defined as a control 
field is stored twice in the 
object program. One area is 
reserved for control functions; 
the user may reference the 
other in Calculation Statements 
or Output-Format Statements. 


A control field may be used for 
controlling functions without 
utilizing zone bits in the 
internal comparisons of one 
record to the next, This is 
accomplished by specifying the 
field as numeric by means of a 
decimal entry in position 52. 
Decimal alignment is not per- 
formed for numeric control 
fields. 


RULES for Using Control Fields: 


1. 


A control field may be a com- 
posite of several fields in an 
input record type; such fields 
are called split control fields. 
A split control field for any 
one level must be specified in 
subsequent field description 
statements, 


Columns 


FIELD NAME/Contents 
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Explanation 


2. Within each control level speci- 


fied, the length of the control 
field or the overall length of 
split control fields must be 
the same. 


3. Control fields of any one level 


can be specified as numeric or 
alphameric alternately. 


4. When control fields of one level 


are alternately specified as 
packed and unpacked fields, the 
unpacked field must always have 
a length which is the same as 
the number of digits in the 
packed field. 


5, An indicator entered in the 


field-record relation specifi- 
eation can be used to relate 
control fields to pertinent 
record types when those record 
types are specified in an OR 
relationship. 


The rules for preparing such 
Specifications are: 


a. Control field specifications 
must be grouped by field 
record relation indicators. 


b. Control fields which do not 
have associated field- 
record relation indicators 
must. be specified first 
within one record. 


¢. Pields which are not con- 
trol fields may be inter- 
spersed anywhere within the 
set of field descriptions. 


Control fields which have no 
associated field~xecord relation 
indicators are assumed to be 
contained in all records speci- 
fied in the OR ~ related group 
described above. When control 
fields are specified with and 
without field-record relation 
indicators, only the control 


Columns 


61-62 


FIELD NAME/Contents 


MATCHING 


Ml to M9 
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Explanation 


fields conditioned by field- 
record relation indicators are 
used when the appropriate indi- 
cater is turned on, The control 
field specification without a 
field record relation indicator 
specified is then disregarded. 


Control field specifications 
for a chained file are ignored 
by RPG. 


Provides a matching field designa- 
tor for the field being described. 


Matching may be done: 


@ with one input file; or 
@ with several input files. 


RULES for one Input File: 


1 


2. 


Matching fields specified with 
only one input file are used to 
sequence check successive 
records of the file. 


No MR (Matching Record) indica-~ 
tox is turned on in such a case. 


The program sets HO to cause a 
halt if an out of sequence 
matching field is detected, 


RULES for Matching with Several 
Input Files: 


1. 


Matching fields specified with 
several input files are used to 
match records of the primary 
file with those of secondary 
files, This use is in addition 
to the standard use of matching 
fields to sequence check the 
file for which they are speci- 
fied. 


The comparison made on the 
fields uses the highest level 
as the most significant part of 
a composite match field. 


Columns 


FIELD NAME/Contents 
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Explanation 


RULES for Using Matching Fields: 


1. 


3. 


When there is more than one 
record type in an input file 
the locations of the matching 
fields may differ in the 
various types of records. 


The same number of matching 
fields should be specified for 
all records which use matching 
fields in a given program, 


Matching field specifications 
Mi to M9 are ignored for 
chained files. They can be 
used for chaining files and 
files addressed by an RAF. 


Matching fields must have the 
same field length for the same 
level. 


Split matching fields are not 
valid. The object program 
places the fields defined with 
Ml to M9 in one area for com- 
parison and sequence checking 
as a composite field. Thus, 
matching fields are effectively 
split fields. 


The length of a packed matching 
field is calculated as 2n-1 
where n is the number of charac- 
ters contained in the input 
field concerned. Thus, the cal~ 
culated length is always an odd 
number, 


Field-record-relations for 
matching fields should be spe- 
cified with resulting indicators 
from the main specification line 
or an OR-relation line to which 
the matching field refers. 


Rev. Harch 1970 


Columns 


61-62 


FIELD NAME/Contents 


CHAINING 


cl to co 
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Explanation 


RULES for Relating Matching Fields 
to Associated Record Types When the 
Records are Specified in an OR- 
Relationship Are: 


1. Matching fields which have no 
field-record-relation indicators 
are assumed to be contained in 
all records specified in an OR- 
xelated group. 


2. When matching fields on one 
level are specified with and 
without field-record-relation 
indicators, the matching 
fields conditioned by field- 
record=-relation indicators are 
moved to the match area when 
the appropriate indicator is 
turned on. 


In this case, the matching field 
specification without a field- 
xecord-relation indicator is 
disregarded. 


Specifies that the field being 
described is a chaining field. 


RULES: 


1. A chaining field can be speci- 
fied as: 


® an alphameric field; 

® a packed numeric field (P 
in column 43); ox 

@ an unpacked numeric field. 


2. Alphameric fields are moved 
unchanged into the appropriate 
chaining fields (Cl to C9). 


3. Packed numeric fields are 
unpacked and moved, with numeric 
zones, into the appropriate 
chaining fields, 
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Columns FIELD NAME/Contents 


NOTE: 


63-64 
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Explanation 


4. Unpacked numeric fields are 
moved unpacked with numeric 
zones into the appropriate 
chaining fields. 


5. Matching field specifications 
(Ml-N9) may be used to sequence 
check a chaining file. This is 
done by entering Ml to M9 in 
MATCHING FIELDS or CHAINING 
FIELDS, columns 61-62 on the 
line containing the specifica- 
tion for the appropriate field. 


6. If the same field is used for 
chaining and sequence checking 
it must be defined twice using 
two different field names. 


Matching field and control field specifications are ignored 
when chained file specifications are processed, 


FIELD RECORD RELATION 


xx 
(resulting indicator) 


VI-17 


Identifies which input record in an 
OR-relationship supplies the input 
field; can be used in addition to: 


@ Control Levels, L1-L9; 
@ Matching Fields, M1-M9; and 
e chaining Fields, C1-C9. 


The uses of indicators with control 
levels and matching fields have 
been described in the applicable 
sections above. The use of a 
chaining field is as follows: 


1. If a chaining field is specified 
in a field description statement 
and an entry is made in FIELD 
RECORD RELATION (columns 63-64), 
the chained record will be 
obtained only if any one of the 
record types specified in an OR- 
relationship is present and the 
resulting indicator (in FIELD 
RECORD RELATION 63-64) is on. 


Columns FIELD NAME/Contents 


NOTE: 


65-66 


67-68 


69-70 
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Explanation 


2. %I£ a chaining field is specified 
on a field description line and 
no entry is made in FIELD RECORD 
RELATION (columns 63-64), the 
chained record will be obtained 
if any one of the record types 
specified in an OR-relationship 
is present. To condition chain- 
ing, any indicator may be used. 


Colums 65-70 provide field indicators for testing the value 


of associated fields. 
PLUS 


xx 


MINUS 


xx 


ZERO OR BLANK 


xx 
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Identifies the indicator that is to 
be turned on whenever the value in 
the associated input field is greater 
than zero. Valid for numeric fields 
only. 


Identifies the indicator that is to 
be turned on whenever the value of 
the associated input field is 
smaller than zero. Valid for 
numeric fields only. 


Identifies the indicator that is to 
be turned on whenever the associated 
input field contains no value. This 
condition occurs: 


@ when a numeric input field is 
blank or contains only zeros; 

@ when an alphameric field is 
blank. 


Fields that are all zeros turn on 
blank indicators even though a plus 
or minus sign is present. 


NOTE: Alphameric input fields 
should not be assigned field 
indicators in PLUS or MINUS 
fields. 
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Columns FIELD NAME/Contents Explanation 
RULES for Specifying Indicators: 


, 1. Numeric indicators are speci- 
fied in the form of 2 digits 
ranging from 01 to 99, 


2. Each code can be defined more +} 
than once. If a code is sigesiad. Yea 
defined more than once the “x 
record specification resets - 
the indicator from the status 
it may have had according to 
the prior specification. 


3. RPG programs may specify ten 
additional indicator codes 
called halt indicators in 
these columns. These codes 
are HO through H9. 


If a halt indicator has been 
turned on during the processing 
of a record, the execution of 
the object program is discon- 
tinued when the processing of 
that record has been completed. 
However, if a halt indicator 
that has been turned on by pro- 
cessing a record is turned off 
before the program attempts to 
process the next input record, 
then processing is not 
interrupted. 


RULES for Using Indicators: 


1. One or more field indicators 
can be on at one time. 


2. An indicator entered in the 
PLUS columns (65-66) is turned 
on if the value of the tested 
input field is positive; an 
indicator entered in the MINUS 
columns (67-68) is turned on if 
the value of the tested input 
field is negative. 


is 


QTR 
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Columns 


71-74 


FIELD NAME/Contents 


STERLING SIGN 


S in 74 


blank 
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Explanation 


3. A field indicator entered in 
the ZERO columns (69-70) is 
turned on if the associated 
input field is blank (alpha- 
meric and numeric) or zero 
(numeric) . 


4, The use of an output specifica~ 
tion BLANK AFTER (column 39 of 
the Output-Format Specifications 
form) causes an alphabetic field 
to be set to blanks, or a 
numeric field to be set to zero. 


This is done after the contents 
of the field have been trans- 
ferred to the output area. If 
the output field that is being 
reset to blanks or zeros is 
defined in an input statement 
and this input field is assigned 
a field indicator in the ZERO or 
BLANK position, the field indi- 
cator is turned on when the 
field is set to blanks or zeros 
by the Blank After specifica- 
tion. 


NOTE: The field indicators in ZERO 
or BLANK are set on at the 
beginning of each job. 


Indicates that the sign of the 
Sterling field is in the normal 
position, 


Up to 4 numeric digits, right-justi- 
fied.. Leading zeros may be omitted.. 


Indicates the’ position in the record 
that contains the sign of the 
Sterling field. 


Indicates that the field is not a 
Sterling field. 5 


c. 
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SOME PROGRAMMING CONSIDERATIONS FOR INPUT SPECIFICATIONS 


AND lines for record identification 


The provision of 3 fields (21-27; 28-34 and 35-41) for record identi- 
fication codes does not limit the user to a maximum of 3 such identi- 
fiers, Additional identifiers may be specified on the next line. 

The word AND is written in columns 14-16 to indicate that the record 
identification codes which follow complete the preceding line. The 
programmer may specify as many AND lines as are needed to describe 
his record. However, the AND may be used only when the preceding 
line has 3 specifications entered and additional record identifica—" 
tion codes are needed. 


OR lines for record identification 

When the same fields are contained in records having different identi- 
fication codes the user need not prepare a set of field specifications 
for each type. The word OR may be entered in columns 14 and 15 to 
indicate that the fields being specified may be found in one or more 
types of records, The resulting indicator need not be written on the 
OR line unless the programmer wishes to specify a different resulting 
indicator for that line. An OR record specification sets the result- 
ing indicator specified in the previous line if no new indicator is 
entered. 


Describing fields in a record 


The Input Statement provides two general categories of information. 
Record identification information is entered in columns 7-42, [In the 
field description columns (columns 43-74) one entry represents the 
specifications for one field of an input record type. 


Field description specifications are always begun on the line imne~ 
diately below the specifications that identify record type to ensure 
that they follow immediately in sequence. 


Field description entries describe those fields of the input record 
that are used in the application. 


Each field of the record which is used by the RPG program xequires an 
input statement entry (one line on the form). 


Columns 7-42 of each field description line must be left blank. 
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Zones_used for record identification 


When the zone field of a character is specified as one of the RECORD 
IDENTIFICATION CODES, columns 21-41, the internal value of the zone 
field of the specified position is checked against the internal value 
of the zone portion of the character written on the Input Specifica- 
tion form, 


Records in predetermined sequence 


For RPG purposes input records are considered in predetermined 
sequence when a group of record types is identified and associated 
with ascending sequence numbers written in SEQUENCE, columns 15-16. 
Within such a group the RPG program is set up to check for the 
record types in the order in which they are described by their 
Sequence numbers. A given record type within such a group may be 
optional but wherever it does occur it must occur in the position 
given to it by the sequencing specified. 


Records must be identified for sequencing, The RECORD IDENTIFICATION 


CODES field is used for this purpose. Only the last record sequenced 
for any file can be specified without any identifiers. 


ERROR ACTION 


In general, GE 120/130 RPG attempts to compile a source program effec- 
tively by supplying usable values in specifications that contain 
errors. However, when an error is of a nature that makes such 

action unfeasible the erroneous specification is disregarded. 


The following errors cause a specification to be ignored in process- 
ing: 


@ The PILENAME refers to an undefined file. 


® The FILENAME refers to a table file, an output file or a 
Record Address file. 


e@ An AND record is the first input specification for a file or 
eccurs for an invalid filename. 


@ An AND card contains no record identification codes or 
follows a record which does not specify record identificatior 
codes. 


@ An OR record is out of sequence. 


e@ A duplicate file name has been used to identify a group of 
input specifications. 
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@ A record identification specification is out of sequence, 
i.e., follows an invalidly specified file, AND or OR record. 


@ No FILENAME is specified for a record entry. 


@ Numeric sequenced records are out of order for a chained 
file, 


MI-23 


E. 
1. 


GE 120/130 RPG USER'S GUIDE 
PHE INPUT SPECIFICATIONS PORM 


SOME SAMPLE INPUT SPECIFICATIONS 


Sequenced and unsequenced records in a file 
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The first record specified is given an alphameric sequence - AA in 
SEQUENCE, columns 15-16. Therefore, it may occur anywhere in a 
block of records. It is identified by the character Z in position 
20 ~ 20 in POSITION, columns 21-24, C in C/Z/D, column 26 and Z in 
character, column 27, When this record is recognized resulting 
indicator 26 is set on - 26 in RESULTING INDICATOR, columns 19-20. 


A single field, TITLE, is specified for this record type - TITLE in 
FIELD NAME, columns 53-58. This numeric field is 4 positions long - 
3 in FROM, columns 44-47 and 6 in TO, columns 48-51 and has no @ecimal 
Places ~ 0 in DECIMAL POSITIONS, column 52. 


The second record type, identified by the presence of a 2 in position 
3 and some digit other than 6 (N in NOT, column 32) in position 5 
must always be the fixst record in a sequenced block - 01 in 
SEQUENCE, columns 15-16. There is 1 and only 1 record of this type - 
1 in NUMBER, column 17. When this second record is encountered 
resulting indicator 27 is turned on - 27 in RESULTING INDICATOR, 
columns 19-20, 


A single field CODE has been specified to illustrate the normal order 
in which these specifications are encountered, i.e., record specifi- 
cations followed by field specifications. 


A third record type is illustrated on line 050. This type is always 
the second in a group - 02 in SEQUENCE, columns 15-16, is identified 
by the presence of a character with the same zone as an A in. position 
12 - RECORD IDENTIFICATION CODES, positions 21-27 and turns on 
resulting indicator 22 - 22 in RESULTING INDICATOR, columns 19-20. 
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OR records and field description entries 
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The letters OR in columns 14-15 are used to indicate that the fields 
described on lines 030 through 110 may be found in one of two record 
types in the file INVOIC. The first record is identified bya 2 in 
position 70 and the presence of a character in position 76 with a 
zone field different from the value of the zone field of the letter 
M ~ RECORD IDENTIFICATION CODES, columns 21-34. This record causes 
indicator 26 to be set on - 26 in RESULTING INDICATOR, columns 19~20, 


The second record which contains the fields described on “jines 030 
through 110 is identified by a 3 in position 70. This also causes 
indicator 26 to be set on - 26 in RESULTING INDICATOR, columns 
19-20 in line 010 and no indicator specified in line 020. 
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OR records with fields in different locations 
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Whenever an input record contains a 2 in position 70 and no 1l-punch 
in column 76 ~ specified in’ RECORD IDENTIFICATION CODES, columns 21 
through 41 - indicator 26 is turned on - 26 in RESULTING INDICATORS, 
columns 19-20, 


A second input record contains almost all of the same fields in the 
same locations and is therefore described in an OR-relationship to 
the record described above - OR in columns 14-15, ‘This record is 
identified by a 3 in position 70 - specified in RECORD IDENTIFICATION 
CODES, columns 21 through 41. The presence of this record causes 
indicator 28 to be turned on - 28 in RESULTING INDICATORS, colums 
19-20. 


The specification of the two records in an OR relationship indicates 
that the fields described in lines 030 through 120 are contained in 
both of the records. However, one field, SHIP is not in the same 
locations in the two records. ‘Therefore SHIP is described twice and 
its positions in each of the records distinguished by the use of an 
appropriate FIELD-RECORD RELATION indicator in columns 63-64, This 
indicator isthe resulting indicator associated with the record type 
in which SHIP is to be found in the specified locations. 


Thus, if resulting indicator 26 is on, the SHIP field is taken from 
locations 66-70 of the input record. If resulting indicator 28 is on, 
the SHIP field is taken from locations 61-65 of the input record. 


The use of an OR-relationship is not restricted to two record types. 
Any number of record types may be specified. 
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4. Multiple split contro? fields 


@) Record Menticaion Codes Feld 


|] loname H 


— 
eee to) 


=e 
BIRR rem 


a ieee ete 
L al 74 3a pe 

t jue 2 

E Te ASRSMEEET I ‘guage HHT T 

There are four record types containing a number of similar fields. 

These record types are distinguished by a character from 1 to 4 in 


position 3 - as specified in RECORD IDENTIFICATION CODES, columns 21 
through 41. 


Each of the different record types causes a different resulting 
(@) indicator to be set on. The indicators are numbered 21 through 24 - 
as specified in RESULTING INDICATORS, colums 19-20. 


The four records contain similar fields except for those described on 
lines 110 through 170. The fields specified on these lines are 
associated with either record type 21 or 22; by means of entries in 
FIELD RECORD RELATION, columns 63-64. 


The fields specified are multiple split control fields. Records 
will be used to provide control fields as follows: 


e@ Record 21. The Li and £3 control fields are specified 
and conditioned by the field-record relation indicator 21 in 
lines 110-130. The entries with indicators Ll and 13 that 
are not conditioned by field-record relation indicators are 
entered for the L2 control field specified in line 070. 
Therefore, this L2 control field is used by the object pro- 
gram for records of type 21. 


@ Record Type 22. Ll and L2 indicators are specified in lines 
140-170. The specifications with the L3-indicator entry in 
lines 090-100 are used when a record of this type is read by 
the object program. ‘ 


L @ Record Types 23 and 24. cControl-field entries conditioned by 
field-record relation indicators are not specified for these 
records. The contents of the fields specified without a 
field-record relation indicator entry (lines 050-100) are 
obtained and processed by the object program for all three 
control levels. 
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The table below shows the record locations from which the control 


fields will be taken when the different record types are read during 
execution of the object program. 


RECORD TYPE 


5. Specifying matching fields to sequence check a single file 


GE 100 Senies REPORT PROGRAM GENERATOR INPUT SPECIFICATIONS ’. 

eA GE 120/130 
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Record Identification Codes 
— =< 2 z 


If only one input file is specified, fields within the file may be 
sequence~checked by means of up to three specifications for matching 
fields. 7 ; 


The records of the REGSTR file will be checked as follows: 


the data from the fields REG, STAT and OFF will be moved to 
matching field holding areas with the OFF - M3 in columns 63-64 -— 
in the highest order (leftmost) positions. 


data from each record (after the first) read will be compared — 
after moving to the matching area - to the data from the pre- 
vious record. 


the direction of the comparison - ascending or descending - is 


determined by the specification in column 18 (SEQUENCE) of the 
File Description entry for the REGSTR file. 
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Sequence checking a chaining file using the chaining field 
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The chaining file, CHAIN, is to be sequence-checked on the field in 
positions 27-35. This field is also the chaining field. It is, 
therefore, defined twice. 


On line 040 it is defined as a chaining field - Cl in positions 
61; 62 - and given the name SOCSEC. 


On line 050 it is defined as a matching field - Ml in positions 
61; 62 ~ and given the name IDENT. 
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VET, THE CALCULATION SPECIFICATIONS FORM 


PURPOSE AND USE 


The specifications entered on the Calculations Specifications form 
determine the way the object program is to process both the input data 
and data obtained as a result of previous processing. 


Three general categories of information are entered on the Calculation 
Specifications form: 


@ Conditioning Specifications (columns 7-17), 
@ Calculation Specifications (columns 18-53), and 
® Testing Specifications (columns 54-59). 


Conditioning Specifications indicate when the calculations are to be 
carried out. 


Calculation Specifications specify the kind (e.g., addition) of cal- 
culations to be performed, the data to be used and provide informa- 
tion about results obtained. 


Testing Specifications determine the way in which results are to be 
tested and used to condition subsequent calculations or output. 


The complete Calculation statement, comprised of the conditioning, 
ealenlation and testing portions, serves to: 


® associate control level and other indicators with calcula- 
tions to be performed 


® identify the fields or quantities to be used in arithmetic 
and logical processing 


® specify arithmetic and logical operations to be carried out 
@ determine how the results are to be processed. 


The Calculations Specifications form and its major subdivisions are 
Pictured below in Figure 7.A. 
10) Sales 
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B. FORMAT AND CONTENT OF THE CALCULATION SPECIFICATIONS 


Columns 


7-8 


FIELD NAME/Contents 


CONTROL LEVEL 


L1-L9; LO; LR’ 
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Explanation 


An entry in these columns, selected 
from among the eleven possible two- 
character codes shown on the left, 
indicates that the calculations are 
to be performed at total-time, and 
determines the control level of the 
calculations specified in columns 
18-59. 


NOTE: In specifying calculations 
it is necessary to write all 
@etail calculations prior to 
control calculations. Con- 
trol calculations should be 
written in order of control 
level used. 


The control level indicators LI-19 
are those defined in the CONTROL 
LEVEL field (columns 59-60) of the 
Input Specifications form. 


LR (Last Record), an ad@itional 
indicator, is turned on after the 
last input record has been read and 
calculated, and after the specified 
detail output records have been 
processed, At this time, the con- 
trol level indicators Ll through L9 
are also turned on and therefore 
final totals can be performed. 


LO (Level Zero) is also an addi- 
tional indicator. It is turned on 
at the beginning of a job and before 
a record is read. It is not turned 
off by the RPG object program at any 
time. 


The LO indicator can be turned off 
by the programmer only for a single 
program cycle, It is turned on 
again by the RPG object program at 
the end of the same cycle. Nor- 
maily, the LO indicator remains on 
throughout the execution of an 
object program. By specifying LO, 
total calculations can be performed 
even though a control break has not 
occurred, 
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Explanation 


RULES for Control Level Indicators: 


1. 


A control level indicator is 
turned on by a control break. 
It is on during total time and 
it remains on for the following 
detail time, which includes 
both the calculating and the 
printing of the detail record. 


A control break for a specific 
control level forces all lower 
control level indicators to be 
turned on. 


A test is made after the reading 
of an input record to determine 
if a control break has occurred. 
Total calculations are performed 
when this test is completed and 
before the record that caused 
the control break is processed. 


Total calculations and total 
output lines are processed at 
the beginning of a program run 
as follows: 


a. If no control fields are 
specified, total calcula-— 
tions and total output 
lines are bypassed for the 
first record read. 


b. If control fields (includ- 
ing LO) are specified, 
total calculations and 
total output lines are 
bypassed for all records 
read until the first record. 
that contains control field 
information has been pro~ 
cessed. 


Indicates that the indicator (if 
any) specified in columns 10 and 11 
should be on to condition the cal- 
culation described in the statement. 


Indicates that the indicator (if 

any) specified in columns 10 and 11 
should be off to condition the cal- 
culation described in the statement. 
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Columns FIELD NAME/Contents Explanation 


10-11 mn 
(a Resulting Indicator 
set by some previous 
RPG process.) 


HO, Hl to H9 Identifies the indicator that must 
be checked hefore the associated 
MR; calculation is performed. 
ip 
L1-L9; LR 
OV; OF 
12 See 9 


13-14 See 10-11 
15 See 9 
16-17 See 10-11 
RULES: 


1. When the calculation specified 
in the statement is not 
governed by an indicator, con= 
dition columns 9-17 are left 
blank. 


2. When two or three indicators 
are specified in columns 9-17 
on one line, these indicators 
are assumed to be in an AND- 
relationship. 


3. If no conditions are specified 
{columns 7-8 and 9-17 blank), 
the calculation is performed 
each time a detail record is 
read. 


4. If a resulting indicator that 
has been defined in columns 
19-20 of the Input Specifica- 
tions form is placed in the 
INDICATORS field of a particu- 
lar calculation line, this 
calculation is performed only 
if a record of the type asso- 
ciated with the resulting indi- 
cator is read. It is not per- 
formed for any other record 


type. 
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Columns FIELD NAME/Contents Explanation 


5. A field indicator code controls 
the calculation according to 
the status of the associated 
input data field, 


6. A resulting indicator specified 
in columns 54-59 of a preceding 
caleulation line controls a 
eurrent calculation according 
to the condition that occurred 
in the RESULT FIELD of that 
previous calculation (see dis- 
cussion below for “détwiled des- 
eription). 


7. <A control-level indicator (L1- 
L9) that is used with a given 
resulting indicator permits the 
calculation to be performed at 
detail time. However, the cal- 
culation is performed only on 
the first record of the control 
level specified. 


8. The MR (matching record) indi- 
cator code means that the cal- 
culation is performed only if 
there is a matching record in a 
second input file. 


9. The halt indicators, HO, Hl to 
H9, are normally used either to 
halt the program or to suppress 
a calculation when an error has 
been detected in the input data 
or during a previous calculation. 


10. The overflow indicators, OF or 
OV allow for performing the 
calculation only if a page 
overflow has occurred, 


VII-5 


Colums FIELD NAME/Contents 


GE 120/130 RPG ISER’S GUIDE 
THE CALCULATION SPECIFICATIONS FORM 


Explanation 


NOTE: The entries in columns 18-53 constitute the calculation speci- 
fications portion of the Calculation statement, 


18-27 FACTOR 1 


AXXXXX 


" XXXXXXXX" 


mnnnnnnnnn 
or 
dtnnnnnnnnn 
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Up to 6 alphameric characters, the 
first of which must be a letter. 
The entry is left-justified in the 
field; no special symbols or 
embedded blanks are permitted. 


An entry in this form (AXXXXX) 
identifies the data field which is 
the first factor of the operation. 
It must be the name of a field 
defined in the FIELD NAME field of 
the Input Specifications form 
(columns 53-58), or in the RESULT 
FIELD (columns 43-48) of another 
Calculation statement. 


Up to 8 alphameric characters 
enclosed by apostrophes, left- 
justified. Any character of the 

GE 120/130 character set, including 
special characters and embedded 
bianks, is valid in such an entry. 


An entry in this form ('XXXXXXxX') 
is called an alphameric literal. 
It provides the actual alphameric 
data used in an operation. 


Up to 10 numeric digits, or up to 9 
numeric digits preceded by a + or - 
sign: left-justified. one decimal 
point may replace any of the n's in 
such an entry, called a numeric 
literal. 


A numeric literal provides the actual 
numeric data used in an operation. 


RULES for Numeric Literals: 

1. A numeric literal may consist 
of any combination of the digits 
0 through 9. 

2. One decimal point and/or one 


plus sign or minus sign may 
also be used. 
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Columns FIELD NAME/Contents Explanation 


3. Separators (e.g., a comma 
between the thousands and 
hundreds positions) other than 
those noted in Rule 2 above 
must not be used, 


4. A numeric literal may be up to 
10 characters Jong. 


5. Blanks must not appear within 
numeric literals. 


6. The leftmost character of a 
signed numeric literal must 
contain the sign. An unsigned 
literal is treated as positive, 


7. The decimal point may appear 
anywhere in the literal. 


8. Numeric literals must not be 
enclosed by apostrophes. 


RULES for Alphameric Literals: 


1. Alphameric literals must be 
written between apostrophes, 


2. Any of the graphic characters 
in the GE character set may be 
used in an alphameric literal. 
Blanks in the body of the 
literal are valid characters. 


3. Alphameric literals may be up 
to 8 characters in length, 
excluding the two enclosing 
apostrophes. 


4, Apostrophes which appear within 
alphameric literals must be 
written as a pair of consecu- 
tive apostrophes, 
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Columns FIELD NAME/Contents Explanation 


28-32 OPERATION 


(operation mnemonic) Entries in the OPERATION field spe- 
cify the operation to be performed 
using the entries in FACTOR 1, 
FACTOR 2 and RESULT FIELD fields. 


Each operation is specified by 
entering the appropriate operation 
mnemonic left-justified in the 
OPERATION field. ‘he operation 
mnemonics and a detailed presenta- 
tion of their use in the Calcula- 
tion statement appears in the 


Entries in the Operation Field 


section of this chapter. 


33-42 FACTOR 2 


AXXXKX The description of FACTOR 1 entries 
"XXRXXXEX', also applies to FACTOR 2 entries. 
nnnnannnnn, or 

annnnnnnnn 


43-48 RESULT FIELD 


AXXXXX Up to 6 alphameric characters, the 
first of which must be a letter, 
The entry is left-justified in the 
field; no special characters or 
embedded blanks are permitted. 


This entry causes the specified 
number of core storage positions to 
be reserved for calculation results. 


A RESULT FIELD name need not be 
unique. If a given field is used 
several times in different calcula- 
tions, the length of the field and 
the number of decimal positions 
must be the same for all calcula- 


tions. 
49-51 FIELD LENGTH 
nnn Up to 3 numeric digits, right- 
justified. Leading zeros may be 
omitted. 


This entry specifies the length of 
the result field. 
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Coijiumns FIELD NAME/Contents Explanation 


RULES: 


1, The maximum length of numeric 
fields is 15 digits. 


2. the maximum length of alphameric 
fields is 256 characters. 


3. If the length of an arithmetic 
result exceeds the specified 
length of the associated RESULT 
FIELD entry, the contents of 
such a result field and the 
condition of the associated 
result indicators are both 
indeterminate. 


4, If the same RESULT FIELD name 
is used in more than one calcu-~ 
lation, the FIELD LENGTH speci- 
fication and the DECIMAL POSI- 
TIONS specification need not be 
entered more than once. 


S. If the field length and decimal 
positions specifications asso- 
ciated with a given field name 
have been defined in an Input 
statement, they need not he 
xepeated in the Calculation 
statement. Should the programmer 
wish to enter specifications 
for the field in the FIELD 
LENGTH and DECIMAL POSITIONS 
fields of the Calculation Speci- 
fications form, they must dupli- 
cate the related entries in the 
Input statement. 


6. If half-adjustment (i.e., 
rounding) is specified, the 
entries in FIELD LENGTH and 
DECIMAL POSITIONS refer to the 
length of the result field 
after half-adjustment. 
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Columns FIELD NAME/Contents 


52 DECIMAL POSITIONS 


OorN 


blank 


53 HALF-ADJUST 


H 
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Explanation 


Indicates that there are no posi- 
tions to the right of the decimal 
point in the result field. 


Indicates that there are one to 
nine positions to the right of the 
decimal point in the result field, 


For alphameric fields. 
RULES :- 


1. An entry must be made for all 
arithmetic operations involving 
fields not specified elsewhere. 


2. The number of decimal positions 
must not exceed the specified 
length of the result field. 


Indicates the resuit is to be haif- 
adjusted (rounded) . 


RULES + 


1. If the number of decimal posi- 
tions of the arithmetic result 
is less than or equal to the 
specified decimal positions of 
the result field, no half- 
adjusting is possible. 


2. If the arithmetic result has 
more decimal positions than the 
specified result field, an H in 
half-adjust causes the arith- 
metic result to be truncated’ 
(by dropping the rightmost 
digits) until the result is one 
digit longer than the specified 
result field. ‘The absolute 
value of the (truncated) result 
is half-adjusted. The rightmost 
digit is then dropped, the 
original sign (plus or minus) is 
restored, and the adjusted 
result is moved into the speci- 
fied result field. 
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Columns FIELD NAME/Contents Explanation 


NOTE: Columns 54-59 contain the Testing Specifications portion of 
the Calculation statement. 


54-59 RESULTING INDICATORS/ 
COMPA! 


54-55 PLUS/HIGH 


(any valid RBG indi- Specifies the indicator to be used 

cator) in connection with operations or 
results interpreted as + or greater 
than. (See uses discussed below.) 


56-57 MINUS/LOW 


{any valid RPG indi- Specifies the indicator to be used 

cator) in connection with operations or 
results interpreted as - or less 
than. 


58-59  ZERO/EQUAL 


{any valid RPG indi- Specifies the indicator to be used 
cator) in connection with operations or 
results interpreted as zero or 
. equal. 
RULES: 


1. Indicator specifications are 
used for: 


® Determination of whether 
the result of an arithmetic 
operation is plus, minus or 
zero. (The result referred 
to is always the result 
after half-adjustment where 
specified.) 


® interrogation of the result 
of a compare operation. 
The indicators are set as 
follows: 


High for Factor 1 greater 
than (>) Factor 2 

Low for Factor 1 less than 
(<) Factor 2 

Equal for Factor 1 equal 
(=) to Factor 2. 
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Columns 
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FIELD NAME/Contents 


Explanation 


@ Definition of the type of 
LOKUP operation by deter— 
mining: 


a. If the argument next- 
higher than the search 
argument is found. 


b. If the argument next- 
loewex than the search 
argument is found. 


ec. I£ the argument equal 
to the search argument 
is found. 


NOTE: if an equal-search resulting 


3. 
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indicator is specified, it 
takes precedence over either 
high or low indicators if an 
equal table value exists. 


e Definition of the type 
of zone to be tested by 
a TESTZ operation. 


® Definition of the indi- 
cators to be turned on 
or off by SETON and 
SETOF. 


Entries for this specification 
can be any of the indicator 
codes. 


Indicator codes can be defined 
one or more times. If an indi- 
cator is defined more than once, 
each subsequent specification 
of the indicator resets it from 
the status it may have had from 
a previous specification. 


A resulting indicator is not 
reset (turned on or off) until 
the next time a calculation is 
performed for which that indi- 
eator is specified as a result 
indicator. Therefore, one or 
More resulting indicators can 
be on simultaneously. 
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Columns FIELD NAME/Contents Explanation 


5. A resulting indicator specified 
for the zero value is turned on 
when the associated field is 
set to zeros by a BLANK APTER 
specification (column 34) of the 
Output-Format Specification 
form. | 


(Columns 54-55) (Columns 56-57) (Columns 5. 
Caer FIELD 
CHECKED 
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FIGURE 7.8 SUMMARY OF CONDITIONS THAT TURN ON INDICATORS IN COLUMNS 54-59 


60-74 COMMENTS 


any graphic character Text for commentary printed on the 
belonging to the program listing. 

GE 120/130 character 

set, including blanks 
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C. ENTRIES IN THE OPERATION FIELD 


GE 120/130 RPG provides twenty-seven operations for processing data. 
The user need only specify the applicable mnemonic to indicate that 
a.given process is to be carried out in the object program. 


To specify RPG operations, the mnemonic is entered left-justified in 
the OPERATION field (columns 28-32). FACTOR 1, FACTOR 2 and RESULT 
FIELD specifications as required by the particular operation to be 
performed are entered on the same Line. 


Figure 7.C below summarizes, by general operation types, the specific 
operations provided by RPG. Associated mnemonics are shown for 
reference. Detailed discussion of these operations follows. 


OPERATION/TYPE OPERATION OPERATION MNEMONIC 


Arithmetic Adda 


Zero and Add 

Subtract 

Zero and Subtract 

Multiply MULT 
Divide DIV 


Move Remainder 


Mov. 


Move-Leftmost-Characters MOVEL 
Move Low-to-High Zone MLHZO 
Move High-to-Low Zone MHLZO 
Move High-to-High Zone MHHZO 


Move Low-to-Low Zone 


Compare or Test Compare 


Test Zone 


Indicator Set Indicators on 


Set Indicators Off 


Table Lookup 


Branching and Exit Branching (or Go To) 
Providing a Label for GOTO 
Exit to a Subroutine 

RPG label 


USER label 


Conversion 


Key field 
RPG Conversion Entry 
End of RPG Conversion 
External Conversion 


FIGURE 7.C ENTRIES IN THE OPERATION FIELD 
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D. ARITHMETIC OPERATIONS 


) RPG provides seven arithmetic operations. They are: 
ADD - Add 
2-ADD - Zero and Add 
sUB  - Subtract. 


2-SUB - Zero and Subtract 
MULT - Multiply 
DIV - Divide 
MVR - Move Remainder 
The common rules for using arithmetic operations are: 
@ All fields or literals referenced must be numeric. 
@ Automatic decimal alignment is performed by RPG. 
ie) @ The length of any field involved in an arithmetic operation 
must not exceed 15 digits (including any necessary align- 


ment). 


e@ GE 120/130 RPG does not detect any overflow. 


1. ADD (Add) 


@) The contents of FACTOR 1 are added algebraically to the contents of 
FACTOR 2. 


The sum replaces the RESULT FIELD. 


2.  2-ADD (Zero and Add) 


oO The RESULT FIELD is set to zero; then the contents of FACTOR 2 are 
placed in that field. 


FACTOR 1 is not used by the 2-ADD operation. 


3. SUB (Subtract) 


The contents of FACTOR 2 are algebraically subtracted from the con- 
tents of FACTOR 1. 


The difference replaces the contents of the specified RESULT .PIELD. 
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Z-SUB_ (Zero and Subtract) 


The RESULT FIELD is set to zero; then the negative of the contents (@) 
of FACTOR 2 are placed in that field. 


FACTOR 1 is not used by the Z-SUB operation. 


MULT (Multiply) 


The contents of FACTOR 1 are multiplied algebraically by the contents 
of FACTOR 2. The product is placed in the specified RESULT FIELD. 


Conventions for Using MULT: 


@ Only the number of decimal places specified (in column 52) 
is retained. 


@ Any excess low-order (rightmost) decimal places are dropped. Oo 


@ If the arithmetic result exceeds 15 digits, it is truncated 
in the high-order (leftmost) positions to produce a 15 
digit result. 


@ The following formula can.be used to determine if leftmost 
positions of the arithmetic result of the multiplication 


operation will be truncated: 


where 


L,.- D) +b, - Dd, +d, < 15 
length of FACTOR 1 (muitiplicand) 

number of decimal positions in PACTOR 1 

length of FACTOR 2 (multiplier) @) 
number of decimal positions in FACTOR 2 


specified number of decimal positions in the 
RESULT FIELD (product) 
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DIV (Divide) 


The contents of FACTOR 1 are divided by the contents of FACTOR 2. 
The quotient is placed in the specified RESULT? FIELD. 


Conventions for Using DIV: 


The contents of FACTOR 2 must not be zero, 


Any remainder that results from the operation is lost unless 
the Move Remainder (MVR) operation is specified as the next 
operation. 


When the Move Remainder operation is used, the Divide opera-~ 
tion may not be specified with half-adjustment. 


The following formulas can be used to determine the highest 
number of positions (or decimal positions) available in any 
one of the fields. ‘They can also be used to check in 
advance whether the field lengths are such that a given 
division can be performed. 


7 & < 15; 
Ly + Dy Dy Dd. 15; and 
= < 15; 
Ly Dy + Dy + D. 15; and 
in the case of half-adjustment 
- < 
Ly Dy Bo Dy te D. 14 
where . 
L, = length of FACTOR 1 (dividend) 
D, = number of decimal positions in FACTOR 1 
L, = Jength of FACTOR 2 (divisor) 


number of decimal positions in FACTOR 2 


D_ = specified number of decimal positions in the 
RESULT FIELD (quotient) 


The number of decimal positions in each of the three ele- 
ments of a division operation should satisfy the following 
condition: 

A: D.- iD, +D,=0 


If this is not the case, either the dividend or the divisor 
will be adjusted (padded) by adding zeros to the right, 
depending on the following conditions: 

A> 0 implies padding of dividend 

A < 0 implies padding of divisor 


The number of zeros added is equal to the absolute value of A. 
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MVR (Move Remainder) 


The Move Remainder operation moves the remainder of a divide opera— 
tion to a separate field that has been set to zero by RPG. When 
used, it must immediately follow the Divide operation to which it 


refers. 


Conventions for Using MVR: 


The value of the remainder can be determined by the following 
formula 


R = Dividend - Divisor x Quotient. 


The result field of an MVR operation may be assigned result— 
ing indicators (in columns 54-59). 


FACTOR 1 and FACTOR 2 are not used in an MVR operation. 


If conditions are specified (control level or indicators) for 
a DIV operation, the same conditions must be established for 
the associated MVR operation. The MVR line must contain all 
the indicators specified on the associated DIV line. How- 
ever, additional indicators are permitted on the MVR line, 


Tf a control level is specified for the DIV operation, the 
same or a higher control level must be entered in columns 
7-8 of the associated MVR line. If the DIV operation is 
executed at detail time (blanks in columns 7-8), the MVR 
operation must also be executed at detail time. 


VI-18 


GE 120/130 RPG USER'S GUIDE 
THE CALCULATION SPECIFICATIONS FORM 


E.” MOVE OPERATIONS . 


RPG provides six move operations. They are: 


MOVE - Move 

MOVEL ~ Move Left 

MLHZO - Move Low-to-High Zone 
MHLZO - Move High-to-Low Zone 
MHHZO - Move High-to~High Zone 
MLLZO - Move Low-to-Low Zone 


The first two Move operations listed above (MOVE and MOVEL) operate 
on entire fields. 


The remaining four Move operations (MLUZO, MHLZO, MHHZO, MULZO) 
operate on the zone portion only of a given character within a 
specified field. 


The common rules for using move operations are: 


The move operations instruct the RPG program to transfer 
data. 


The name of the field (or the literal) that is to be moved 
is entered in FACTOR 2. 


The name of the field into which the data is to be moved is 
entered in RESULT FIELD. 


A numeric RESULT FIELD requires that decimal places be spe- 
ecified (in column 52). 


Half-adjustment is invalid for move operations. 

FACTOR 1 is not used. 

Move operations may be used to change numeric fields to 
alphameric fields and to change alphameric fields to numeric 
fields. 

An alphameric field is changed to numeric when it is moved 
into a field defined as numeric. No decimal alignment is. 
performed. All zones are removed except the zone of the 


rightmost position. 


A numeric field is changed to an alphameric field when it is 
moved (from FACTOR 2) into an alphameric RESULT FIELD. 
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MOVE (Move) 


The contents of FACTOR 2 - beginning with the rightmost character - 
are moved, into the specified RESULT FIELD. FACTOR 1 is not used by 
the MOVE operation. 


The field in FACTOR 2 may be alphameric or numeric. 
Conventions for Using MOVE: ‘ 


@ If FACTOR 2 is shorter than the specified RESULT FIELD, 
FACTOR 2 is moved to the rightmost positions of the RESULT 
FIELD, Excess lefthand positions are unaffected. 


@ If FACTOR 2 is longer than the specified RESULT FIELD, the 
excess leftmost positions of FACTOR 2 are not moved. 


MOVEL (Move Left) 


The contents of FACTOR 2 - beginning with the leftmost character - 
are moved into the specified RESULT FIELD. 


Conventions for Using MOVEL: 


@ Alphameric fields may be moved into numeric fields; numeric 
fields may be moved into alphameric fields. 


@ Decimal alignment is not performed; all zones except the one 
in the rightmost position are removed from alphameric fields 
when they are moved into numeric fields. 


@ If the RESULT FIELD is longer than FACTOR 2, the excess 
positions at the right of the RESULT FIELD are unaffected. 


@ If FACTOR 2 is longer than the RESULT FIELD the excess 
positions at the right of FACTOR 2 are not moved. 


@ I£ FACTOR 2 is shorter than a numeric RESULT FIELD, the sign 
of the RESULT FIELD is unchanged. 


@ If FACTOR 2 is equal to or longer than a numeric RESULT 
PIELD, the sign of FACTOR 2 is the sign of the RESULT FIELD. 


e@ If a numeric field is moved into an alphameric RESULT FIELD 
that is equal to or longer than FACTOR 2, the sign of the 
numeric field is moved into the position cof the RESULT FIELD 
which contains the rightmost position of FACTOR 2. »If the 
alphamexic RESULT FIELD is shorter than the numeric FACTOR 2 
field, the sign is not moved. 
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MOVE ZONE OPERATIONS 


The common rules for using the four Move Zone operations (MLHZO, 
MHLZO, MHHZO and MLLZO) are the following: 


@ The zone or the sign portion of a specified character 
within FACTOR 2 is moved to the zone or the sign portion of 
a specified character position within the result field, 
depending on field types used. 

@ The fields processed may be numeric or alphameric. 


@ FACTOR 1 is not used by Move Zone operations. 


« NLH20_(Move_Low-to-High Zone) 


The MLHZO operation moves the zone at the rightmost position of 
FACTOR 2 to the leftmost position of the RESULT FIELD. 


PACTOR 2 may be alphameric or numeric, but the RESULT FIELD must be 
alphameric, 


MHLZO (Move High-to-Low Zone) 


The MHLZO operation moves the zone at the leftmost position of 
FACTOR 2 to the rightmost position of the RESULT FIELD. 


FACTOR 2 is assumed alphameric; the RESULT FIELD may be alphameric 
or numeric. 


MHHZ0 (Move High-to-High Zone 


The MHHZO operation moves the zone at the leftmost position of 
FACTOR 2 to the leftmost position of the RESULT FIELD, 


FACTOR 2 and the RESULT FIELD must be defined as alphameric, 


MLLZO_ (Move Low-to-Low Zone) 


The MLLZO operation moves the zone at the rightmost position of 
FACTOR 2 to the rightmost position of the RESULT FIELD. 


FACTOR 2 and the RESULT FIELD may be alphameric or numeric. 
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Conventions for Using Zone Moves: 


The valid field specifications for the zone moves are shown below 
in Figure VII. 


MLLZO 
FACTOR 2 Alphameric RALA2zA 
Se eee eee 
RESULT FIELD Alphaneric {LWW OLEATE 


FACTOR 2 Alphameric UAz2A244 


— 
RESULT FIELD Numeric {2th LLU, 2 Ma ZZ 


FACTOR 2 Numeric ZYls 14 

RESULT FIELD Alphameric £zZ La, 4 Le, ALLA 

FACTOR 2 Numeric My Bly 2M 

RESULT FIELD Numeric 12424, atl, 2 LL 
MHLZO 

FACTOR 2 Alphameric 1z LL Z Ly Zz LA 

RESULT FIELD Numeric Zn Z Hf, Z 


FACTOR 2 Alphameric 2M obey ably BA 
a aa a 
RESULT FIELD Namexic {2.My 2tly 2/4 Z1lr BLL) 
MLEZO 


FACTOR 2 Alphameric 2d ZL, Ae. 


RESULT FIELD Alphameric A My PULE ATA) 

FACTOR 2 Numeric (2ly 2 Le Bly 2 LA 

RESULT FIELD Alphameric LEA4 2M 2 MA 
MHHZO 


FACTOR 2 Alphameric 2M Zl 
RESULT FIELD Alphameric Z2My 2M 21) 


Numeric fields used in MLLZ0 and MHLZO operations always contain 
valid signs after the operation. 
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COMPARE AND TEST OPERATIONS 


RPG provides two compare and test operations. They are: 


COMP ~ Compare 
TESTZ - Test Zone 


COMP (Compare) 


The contents of FACTOR 1 are compared against the contents of FACTOR 
2. 


The RESULT FIELD is not used in a compare operation. 
The compare operation is used to set resulting indicators (specified 
in columns 54-59 of the associated COMP line). The indicators set 


can then be used to condition Calculation and/or Output operations. 


The indicators are set to record the result of the comparison as 
follows: 


FACTOR 1 > FACTOR 2 HIGH indicator (in columns 54-55) 
is turned on 


FACTOR 1 = FACTOR 2 EQUAL indicator (in columns 58-59) 
is turned on 


FACTOR 1 < FACTOR 2 LOW indicator (in columns 56-57) 
is turned on. 


Conventions for Using COMP: 
@ All numeric comparisons are algebraic. 
@ A RESULT FIELD must not be specified in a COMP operation. 


@ The maximun length for. numeric fields to be compared is 15 
digits. 


e The maximum length for alphameric fields to be compared is 
256 characters. 


@ Alignment of FACTOR 1 and FACTOR 2 fields depends on whether 
they are numeric or alphameric. 


When numeric fields are compared, fields of unequal length 
are aligned at the implied (or explicit) decimal point. 
Excess positions in numeric fields are assumed to be filled 
with zeros. 


When alphameric fields are compared, fields of unequal length 


are aligned at their leftmost characters. The excess right- 
hand positions of the shorter field are assumed to be blank. 
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e@ The alphameric COMP operations are based on the internal 
GE 120/130 collating sequence (see Figure VII). 


2.  TESTZ (Test Zone) 


The TESTZ operation tests the zone of the leftmost (high-order; 
position of the field whose name is entered in RESULT FIELD. 


Conventions for Using TESTZ: 


e@ The TESTZ operation is restricted to use with alphameric 
fields. 


e fESTZ can be used to test the zone portion of any of the 64 
GE 120/130 graphic characters. 


e FACTOR 1, FACTOR 2 and columns 52-53 are not used. 


@ The TESTZ operation turns on one of the indicators specified 
in columns 54-59 according to the following rules: 


If a 12-punch is encountered (i.e., + or any of the 
characters having the same zone as the letter A), the 
PLUS indicator (in columns 54-55) is turned on. 


I£ an 1l-punch is detected (- or any of the characters 
having the same zone as the letter J), the MINUS indi- 
eator (in columns 56-57) is turned on. 


If any other zone is detected or if the character is a 
blank (in columns 58-59) ZERO OR BLANK is turned on. 
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GE-100 SERIES CHARACTER SET/COLLATING SEQUENCE 


carp | BULL PRINTER: | HEXADECIMAL | CARD 
cope |cope {CHARACTER VALUE 
ho 


11-0 
11-1 
21-2 
11-3 + 
lish 
11-5 
11-6 
11-7 
21-8 
11-9 
1 


+ 

z 

K 

L 

M 

N 

° 

P 

Q 

R 
-(minus or 


hyphen) 
$ 


MAW OIAUEWNHO 


12-8-3 
11-8-4 »* 
11-8-5 
11-8-6 3 
21-8-7 " (apostrophe) 


° 
Ka 
° 
a 


PASSE HO tO 


ry 
8 

n reMe texxeccaaNs 
& 


FIGURE 7.D GE-100 SERIES CHARACTER SET/COLLATING SEQUENCE 
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INDICATOR OPERATIONS 


RPG provides two operations which turn indicators on or off. ‘They 
ares 


SETON - Set Indicators On 
SETOF - Set Indicators Off 


The common rules for using these two operations are: 


@ SETON and SETOF refer only to the three indicators whose 
codes appear in columns 54-59. 


@ The headings of columns 54-59 - PLUS, MINUS, ZERO OR BLANK — 
have no real meaning for these operations, 


SETON (Set Indicators On) 


The SETON operation causes the indicators specified in columns 54-59 
to be turned on. Any RPG indicator can be turned on by this opera- 
tion. 


SETOF (Set Indicator Off) 


The SETOF operation causes the indicators specified in columns 54-59 
to be turned off. Any RPG indicator can be turned off by this opera- 
tion, 


Conventions for Using SETON and SETOF: 


@ T£ the LR (last record) indicator is turned on during total 
calculations by a SETON operation, processing is terminated 
after the output of the total lines. 


@ If the OV or OF indicator is changed by a SETON or SETOF 
operation during total or detail calculations, the RPG 
object program resets the indicator at the end of the asso-— 
ciated total or detail output.. a 
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TABLE OPERATION 
RPG provides a single table operation. It is 


LOKUP - Look-up an entry in a table. 


LOKUP (Table look-up) 


The LOKUP operation causes the contents of the field or literal con- 
tained in FACTOR 1 to be used as a search argument to be looked up in 
the table named in PACTOR 2. As a result of the argument search an 
associated function is retrieved from the table named in the RESULT 
FIELD, 


Conventions for Using LOKUP: 


@ A function may be located but not retrieved; in this case the 
RESULT FIELD is left blank. 


® No decimal alignment is performed for look-up. 


@ 3 table to be searched is in core storage and may be in 
ascending, descending or no particular sequence. 


@ Resulting Indicator specifications (columns 54-59) are used 
to indicate the relationship of the entry sought to the 
search argument: high, equal, low, high or equal, low or 
equal, 


e@ After a look-up operation has been performed, the function 
that was retrieved can be referenced in an area which has the 
name of the function table. 


BRANCHING AND EXIT OPERATIONS 


RPG provides operations for branching and subroutine linkage. They 
are: 


GOTO = Branch to an RPG operation. 

TAG - Label an RPG operation for reference. 

EXIT ~- Branch to a subroutine not written in RPG. 

RLABL - Provide cross reference in a subroutine for an RPG field. 

ULABL - Provide cross reference in RPG for a user subroutine 
field. 
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The rules for using these two operations are: 
e CONTROL LEVEL is optional in both GoTo and TAG. 
@ RESULT FIELD is not used by either GOTO or TAG. 
@ GOTO does not use FACTOR 1. 


e TAG does not use FACTOR 2. 


1. GOTO 


The GOTO operation provides a means of leaving one point in the 
object program to enter calculations at some other step in the pro- 
cessing. 3 


The entry point in the RPG program is assigned a name and this name 
is written in the FACTOR 2 field of the GOTO statement. 


2, TAG (Label _an entry for a GOTO) 


The TAG operation is the means of providing a name for that point in 
RPG processing which is to be entered by means of the GOTO statement. 


Conventions for Using GOTO and TAG: 

e@ Branching can be forward, i.e., skipping over some calcula~ 
tions or it can be backward, i.e., returning to processing 
previously skipped. 

@ S8ranching should be performed only within logical calculation 
routines. However, it is possible to branch from one set of 


calculation processes to the other. 


@ A CONTROL LEVEL (columns 7-8) must be specified for GOTO 
operations to be performed at total time. 


e A CONTROL LEVEL, (columns 7-8) must be specified for a TAG 
eperation for a branch to be performed at total time. 


3. EXIT {calt_a subroutine) 


The EXIT operation causes the RPG object program to enter a subrou- 
tine not written in RPG lanquage. 
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RLASL (RPG field label definition) 


The RLABL operation performs no function in GE 120/130 REG. 


ULABL (User field label definition) 


The ULABL operation provides GE 120/130 RPG with the names of fields 
which are defined in user subroutines and are not, therefore, to be 
defined in the RPG progran. 


Conventions for Using EXIT, RLABL, ULABL: 


Chapter IX describes the use of user subroutines in RPG. 


CONVERSION OPERATIONS * 


RPG provides four operations for conversion for addressing data files 
on disc, They are: 


KEYCV - Keyfield 

RPGCV - RPG Conversion Routine Entry 
ERPGC - RPG Conversion Routine End 
EXTCV - External Conversion Routine 


The common rule for using conversion operations is: 


e Indicators (columns 54-59) are not used by any conversion 
operation. 


KEYCV 


The KEYCV operation names, in the RESULT FIELD, the field that is to 
contain the key of a disc record. It is used only when records are 
retrieved using key data and must follow the RPGCV or EXTCV opera— 
tion. FACTOR 1 and FACTOR 2 are not used. 


RPGCV_(RPG conversion) 


The RPGCV operation names, in FACTOR 1, the conversion routine that 
develops the track address which will be placed in the field named 
in RESULT FIELD. The RESULT FIELD must be an 8 character alphameric 
field. . 
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3. ERPGC (End of RPG conversion) 


The ERPGC operation indicates the end of an RPG conversion sequence. 


4, EXT¢V (External conversion 


The EXTCV operation indicates that the track address conversion rou- 
tine, named in FACTOR 2, is external to RPG, FACTOR 1 contains the 
RPG name for the call to the external subroutine. The RESULT FIELD 
contains the name of the @ character alphameric field that is to be 
used to contain the track address. 


Figure 7.E below summarizes the entries in RPG operations. 
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SOME PROGRAMMING CONSIDERATIONS FOR CALCULATIONS 
Arithmetic operations 


No overflow is detected in GE 120/130 RPG arithmetic operations. There 
is no check made of field definitions to determine whether fields 
referenced in divide operations, for example, allow for valid opera- 
tion. It is the programmer's responsibility to ensure that speci- 
fied calculations can be properly performed. 


Move operations 


Move operations may be performed between fields of the same format, 
i.e., alphameric or numeric or they may be used to change fields from 
one format to the other. However, no decimal alignment is performed 
for any numeric fields used in moves. 


Resulting indicators may be specified with move operations. 


Move zones 


The move zone operations are conventionally defined for use with 


_ ¢ertain field formats according to the given operation, Only one of 


the zone moves, the MLLZO allows the four.possible pairs of field 
formats. Use of the other three with pairs of field formats for 
which no prevision is made may result in error. In any case, no 
indication is given that invalid specifications have been written. 
The programmer must ensure that operations are used according to 
their definitions. 


Comparing fields 


Comparisons should be made between fields of the same type, i.e., 
alphameric and alphameric or numeric and numeric. However, RPG does 
not make any check of the format of fields which are used in compari- 
son operations. ; 


Testing zones 


A zone test identifies as positive, for the purpose of setting the 
PLUS indicator, all characters which have a card code that includes 
ai2 punch. All characters which have card codes that include an. 
11 punch are identified as negative, for the purpose of setting the 
MINUS indicator. All other characters cause the ZERO (no zone 
indicator to be set. 
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Table references 


Before any table look-up has been performed the first entry in each 
table is placed in a special holding area. The name of this area is 
the same as the name of the table, 


After table look-up is performed for a given table the entry that was 
retrieved replaces the entry in the holding area for that table. 


The function that is retrieved may be utilized in another operation 
by specifying the name of the table as FACTOR 1 or FACTOR 2 of an RPG 
operation. 


A table may be updated as a result of some operation when the table 

name appears as the RESULT FIELD. When a table is updated the entry 
in the holding area and the correspending entry within the table are 
updated. 


Each look-up operation overlays the entry present in the holding 
area. Thus it is the programmer's responsibility to move an entry 
from the holding area to some other field if it is desired to retain 
that entry for reference after subsequent look-up. 


The type of LOKUP operation is determined by the resulting indicators 
used. Look-up operations are defined as follows: 


High indicator specified - search for the table entry that is 
next higher value to the search 
argument. 


Low indicator specified - search for the table entry that is 
next lower value to the search 
argument. 


Equal indicator specified - search for the table entry equiva- 
lent in value to the search argu~ 
ment. 


NOTES: Indicators may be specified in pairs, e.g., high and equal 
to provide an or condition for searching. 


If an indicator for equal search is specified and an equal 
value exists the equal indicator takes precedence over 
either of the other indicators that might be specified with 
it. 
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7. Branching within the RPG program 


Within each of the two logical segments of RPG calculation process- 
ing - detail time and total time routines - it is possible to 
interrupt the sequential flow by branching. A branch may be taken 
either backward - to repeat some sequence of operations, or, forward - 
to eliminate some calculations. Branching between the two general 
calculation subprograms, e.g., from a detail line to a total line 
should be used with @iscretion. The RPG compiler does not check the 
object program logic. 


8. Using subroutines 


The RPG programmer is responsible for the correctness of his subrou- 
tines and for the proper use of RPG fields. 


ULABL instructions are required ‘to inhibit field definition in RPG to 
avoid multiple definition of field names. 


RLABL statements are not used by GE 120/130 RPG. However, they are 
checked and must be written in accordance with RPG rules, It is 
preferable to eliminate RLABL statements because doing so removes a 
possible source of error in writing. 


All REG defined fields may be referenced in user subroutines; the 
RPG compiler has no means of inhibiting such references. However, 
any use of RPG fields must be in accord with the definition of the 
fields. Failure to abide by the conventions of field definition and 
use may result in error. 


$. Using resulting indicators 


A given resulting indicator may be defined one or more times on 
calculation forms, Each specification of a resulting indicator 
causes it to be reset; indicators defined more than once are there- 
fore reset at each specification. 


A resulting indicator is reset only when a calculation is performed 
which references that indicator as a resulting indicator. Therefore 
it is possible for more than one resulting indicator to be on at a 
given time. 


Bn indicator specified in columns in the ZERO or BLANK indicator 


position, columns 58-59,. of an ADD, Z-ADD, SUB, Z-SUB, MULT, DIV, 
MVR, MOVE or MOVEL is initialized on. 
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ERROR ACTION 
In general, GE 120/130 RPG attempts to compile a source program effec- 
tively by supplying usable values in specifications that contain 
errors. However, when an error is of a nature that makes such action 


unfeasible the erroneous specification is disregarded. 


The following errors cause a Calculation Specification to be ignored 
in processing: 


@ The field type is invalid for the operation specified. 


e@ A detail calculation specification follows a total calcula- 
tion specification. 


® A KEYCV or ERPGC specification is not preceded by an EXTCV 
or RPGCV specification. 


@ A conversion name is used to define a field. 

@ &An MVR specification is not immediately preceded by a DIV 
specification or is preceded by a DIV for which half adjust .. 
is specified. . 

e@, Fields specifying track addresses are not 8 characters long, 


@ The operation code is invalid or missing. 


@ Required entries in FACTOR 1, FACTOR 2 or the RESULT FIELD 
are missing or invalid. 


@ Required Resulting Indicators are not specified. 


SOME SAMPLE CALCULATIONS SPECIFICATIONS 


The following examples are sample statements written in RPG language 
to illustrate the way the various fields on the calculations form are 
used in calculation statements. A number of statements are given for 
each operation, showing the use of optional and required fields. 


(Blank lines are shown only for readability; detail and total lines 
are shown intermixed simply as examples of possible formats.) | 
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ADD (Add) 

& 10) Sowes REPORT PROGRAM GENERATOR CALCUIATION SPECIFICATIONS 

z GE 120/130 

re, —T st a neensn 

ila : to, KEE vm [ worm LOI) 
al et 


Foctor 2 own natd | Pe, 


FRRRTEES (PERI 


2-ADD {Zero and Add) 


& 10) Scates REPORT PROGRAM GENERATOR CALCULATION SPECIFICATIONS 
: . ce t20130 


cay fh bannen 


ett rtd | 


be meme nfo 4 


ADDY 
relay Reo 
B-ADDSASE 


SUB (Subtract) 


& 100 Seues REPORT PROGRAM GENERATOR CALCULATION SPECIFICATIONS 
7 : GE 420/130 


f= EEE 


Opies] Foctor 2 Commenty 
DET SAT aTTTR LTC 2 : : 
BB RINC | + yd : i 
REMAIN G22¥ 


: eel ie (a a 
'ESTIM:. SUB 1000.00: NEWES. OM: 2227 
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2-SUB_(Zero_and Subtract) 


© 100 Serres. 


REPORT PROGRAM GENERATOR CALCULATION SPre:CATION® 
i GE 120/130 


mI 


H i) 
Hessen head Ht 
“ULL HS vOWET TT 1 WEWC. | Oz 


MULT (Multiply). 


10 Semtex 


REPORT PROGRAM GENERATOR CALCULATION  SPECIFICAT‘cN'> 
wa OE 120/130 


DIV (Divide) and MVR (Move Remainder) 


I hoe, 


REPONT PROGRAM AINIAATOR — CAICULATION SPECIFICATIONS 


GE 120/430 
tH 
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MOVEL (Move Left) 


REPORT PROGRAM. GINEPATOR CALCULATION $22 
: GE 120/130 


Fector 1 = 


"Sant 0 


WaBREV [6 
sO 
OLR | 


whe ES iv 
HOVELCOMPUT —Stanre 4017-1 


How the MOVEL functions 


The following are some illustrations of how fields are moved by 
the MOVEL in RPG: 


FACTOR 2 RESULT FIELD RESULT FIELD 
BEFORE MOVEL AFTER MOVEL 


Alphameric field to alphameric field; RESULT FIELD longer 
than FACTOR 2 field. 


CITY STATEDTAX CITYbbTAX 


Numeric field to numeric field; RESULT FIELD shorter than 
FACTOR 2 field. 


29763 623 297 


ViI-39 


GE 120/130 RPG USER'S GUIDE 
THE CALCULATION SPECIFICATIONS FORM 


- Zone moves 


MLHZO - Move Low to High Zone 
MHLZO = Move High to Low Zone 
MHHZO - Move High to High Zone 
MLLZO - Move Low to Low Zone 


& 10) Series REPORT PROGRAM GSNENATOR CALCULATION SPECIFICATIONS 
GE 120/430 


Es aan 


Pitch 


Operation} Factor 2 ews ald Comments 


—| 


WLLZOAL PHA 11: 
i ier ES 


DER 


ae 


Trig hytigt? i 
TEWHRZOALPHA T 


How the zone moves function 

The following illustrations show how the zone moves function 
according to the format of the fields used as FACTOR 2 and 
RESULT FIELD: 

a.  MLLZO 


FACTOR 2 RESULT FIELD RESULT FIELD 
BEFORE MLLZO AFTER MLLZO 


i. Both fields alphameric 


IRA[SB) tc jup WE | XG} WF] UG 
ji. . FACTOR 2 alphameric and RESULT FIELD numeric 


JRA) SBI TC JUD} {VE |W [XG] WE | XU} 
iii. FACTOR 2 numeric and RESULT FIELD alphameric 
{RA|SB]'TC |UD [VE |WF | XG} (VE[WE | DG} 
iv. Both fields numeric 

RA] SB/ TC UD) [ELBE [XG (VE JWE [ XD) 
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b.  MHLZO 
i. FACTOR 2 alphameric and RESULT FIELD numeric 
Ra|SB TC |UD [VE |We [ xc) (VEL WE [XR 


ji. Both fields alphameric 


fra] SBTC jun WELWE|xG - WELWE [RG] 
c. MLHZO 


i. Both fields alphameric 


IRA|SB [TC] uD, DELWE [XG] UELWE XG) 

ii. FACTOR 2 numeric and RESULT FIELD alphameric 

{RAJSB TC] UD] VE WE |sG] IB | WE [XG 
d.  MHHZ0. 


Both fields alphameric 


[RA] SB) TC] UD| VE [WE | XG) WE | XG} 


10.- COMP (Compare) 


&E 100 Sones REPORT PROGRAM GENERATOR CALCULATION SPECIFICATIONS 
GE 120/130 


t en) rT + ures i ries 
PAL a [Lee ze 
ne HGR Ta 5 


VIIAu 


i. 


12. 


TESTZ (Test Zone 
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CALCULATION $9: 
GE 120/130 


Comments 


xp 


TEST 


aa 


Indicator settings 


SETON ~ Set. Indicators On 
SETOF - Set Indicators Off 


& 10 Series 


REPOMY PROGRAM GENERATOR 


CALCULATION SPECIFICATIONS 
GE 120/150 


news [eae 7 z panne 
ems iiceell Id Bowen dy H 
Indierors 
Operation] Factor 2 av Ftd Commonts 
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Table look-up and use of table entry 
‘€ 100 Sentcs 


Indteoars 


REPORT PROGRAM GENERATCR CALCULATION SPECIFICATIONS 
GE 120/430 


teaee [ore 1, nnunnn 
oe [een I im) OH Diesel 


Tang 
Iesientore 


rape 
Comore 


Facior 1 + | Operetion) Factor 2 Comments 


nin nun nol 


pele T Ts Lo 


Thr 
D CHIANG! 
Lr lenient 


LiL im 
me 
i 
f 


TH ‘ aE 
WERT Fy xUpTABACT 1 Tir titt 


Branching and exit 


GOTO 
TAG 
EXIT 
RLABL 
ULABL 


REPORT PROGRAM GENERATOR CALCULATION SPECIFICATIONS 
GE 120/130 


SEES -m tits 


=] 


tins 
Preors, | 
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Conversions 

€ 10) Sentes REPORT PROONAM GENERATOR CALCULATION  SPLCIFICATIONS 
we GE 420/430 

ieee 


SE dh tft 


eww fata | 4 Comments 


sieOlel 


TABLE FORMAT 


Entries in a table may be: 


Arguments; 

Functions; 

Alternating arguments and functions; or 
Alternating functions and arguments. 


RULES FOR FORMING TABLES 


1. 


For tables consisting of arguments only, or functions only, each 
unit of table data is called a table entry. For tables consist- 
ing of alternating arguments and functions, one argument and one 
function are called one table entry. 


A name is assigned to the set of all arguments. A name is 
assigned to the coliection of all function entries. 


Names for tables submit to the following conventions: 
@ the name may consist of 4, 5, or 6 characters; 


e@ the first three characters of the table name must be TAB, 
the rest may be any alphameric characters. 


AL] tables may be loaded from the same device. 


A unique file name must be assigned in FROM FILENAME, columns 
l1-18, for each entry in the File Extension statement. 
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6. Each entry in a File Extension statement for a table must have: 
® a unique file name (columns 11-18); 


e entries in TABLE NAME, columns 27-45 and 46-57, if the 
table consists of alternating arguments and functions. 


RULES FOR CREATING RECORDS CONTAINING TABLE DATA 
1. The first table entry for each record must begin in column 1. 


2. All records must have the same number of table entries, except 
the last. 


3. No blanks can occur between table entries. 


4, All functions or argument entries belonging to a table must have 
the same length. 


‘Ss: When alternating tables are used, each record must begin with an 
entry of the same type, i.e., each record must always begin with 
an argument, or each record must always begin with a function. 


6. When alternating tables are used, the table entries in each 
record must not be split. It is not permissible for a function 
to appear in a different record from its corresponding argument. 


Te If a table consists of all arguments or all functions, an argu- 
ment or a function must not be split. 


8. Table sequence may be ascending or descending; there need not be 
any sequence. 


9. The maximum length of alphameric entries is 256 characters. 
Numeric entries must not exceed 15 digits in length. 


10. Table records must be on a sequentially organized file in fixed- 
length, unblocked record format; there may be more than one 
table entry per record. 


11. The table file to be loaded must contain the precise number of 
entries specified in the File Extension statement. 


WRITING UPDATED TABLES 


After a table has been updated, the table may be written. On the 
File Description Specifications form, the programmer enters the name 
of the file that will contain the updated table. This file name 
must be different from other file names. The file must be defined as 
a sequentially organized output file. 
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On the Pile Extension Specifications form, the programmer enters the 
name of the file on which the updated table will be written in TO 
FILENAME. The name of the table is entered in columns 27-32, If two 
tables are to be output, the name of the second table is entered in 
columns 46-51. 


The updated table files will be put on to the output file after the 
program has reached the end-of~job condition (LR condition). This 
output file must have the same format and size as the input table 
file. 


Wo editing is possible for printing of tables. If editing is abso- 


lutely necessary, the file should be written on dise or tape, read 
back in and edited in a second job. 
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; VIII, THE QUTPUT-FORMAT SPECIFICATIONS FORM 


PURPOSE AND USE 


Entries on the Output-Format Specifications form describe the kind 
of output files to be produced and the location of specific data 
fields within the output reports and records. 


Two general types of information are provided: 
@ File Identification and Control (columns 7-31); and 
e Field Description (columns 23-70), 


File Identification and.Control specifications identify the output 
files (tape, disc, printer and/or punched card files), and records 
to be added to the file. ‘They direct cards to the appropriate 
stackers and provide for correct spacing on printed reports, They 
determine under what conditions and at what time (detail, total or 
overflow time) the records are to be produced. 


Field Description specifications indicate where and when the individ— 
ual fields of the output record are to be punched, printed, or written 
on tape or disc. The entries for these specifications are written on 
the lines below the file identification entries. Each field is des— 
eribed on a separate line. 


The reader should note that the specification "Output Indicators” is 
used for both file identification and field description. The facil- 
ity of controlling the printing and punching of each specific field 
of the record provides great program flexibility in the GE 120/130 RPG. 


The complete Output statement comprised of File Identification and 
Control and Field Description portions, serves to: 


1. Identify the records that make up the output files. 

2. Direct cards ta the appropriate stackers. 

3. Provide the proper spaciny on printed reports. 

4. Specify the conditions under which records are to be produced. 


5. Indicate where and when individual fields are to be placed in 
the output record. % 


6. Define editing procedures and edit masks. Se 
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The Output~Format Specifications form and its major subdivision into 


File Identification and Control and Field Description entry areas, 
is pictured below in Figure 8.A. 


& 100 Sues. REPORT PROGRAM GENERATOR OUTPUT-FORMAY SPECIFICATIONS 
GE L2O/1 30 
ss ry ; Agee 
mee ket Toran 

om | 

ee i] 
nas aay 5 ‘Stactieg 
me SS cai cai et a 

Tt Lleon nu 


Tt ttttii it 
A hott t {17 


T 
T 
i T 
f TTT A J 
Hi TT Fleld Description D fe 
De ee een ee ee ee 


FIGURE 8.A THE OUTPUT-FORMAT SPECIFICATIONS FORM 


B. FORMAT AND CONTENT OF THE OUTPUT-FORMAT SPECIFICATIONS 


Columns FIELD NAME/Contents Explanation 


7-14 PILENAME 


AXXXXXXX Up to 8 alphameric characters, of 
which the first must be alphabetic. 
The entry is left-justified in the 
field; no embedded blanks or 
special characters are permitted. 


RULES: 


1. Each output file must be 
assigned a name. 


2. In file maintenance operations 
(updated or combined files; an 
input record is updated on.the 
basis of newly calculated 
xesults), the same file name 
must be used for both input 
and output specifications. 


3. The file name must be given in 
the first file statement which 
refers to a given file. Subse- 
quent statements for the same 
file need not contain the file 
name. 
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15 
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FIELD NAME/Contents 


4, 


Explanation 


The file name must be repeated 
each time a new reference to it 
is made in the statements. 


That is, when sets of state- 
ments are interspersed the 
file to which each group 
belongs must be identified in 
the first card of the group 
which relates to it. 


Identifies the record being speci- 
fied as a heading record. 


Identifies the record being speci- 
fied as a detail record. 


Identifies the record being speci- 
fied as a total record. 


DEFINITIONS: 
1. Heading recoxds usually con- 


3. 


VINI-3 


tain constant information, but 
they may also contain informa- 
tion from input records, 
including that record present 
at the time the output record 
is produced. 


Detail records have a direct 
relationship to the input 
record. Most of the data ina 
detail line comes from the 
input record or from calcula~ 
tions produced at detail time. 


fotal records are produced 
when control changes occur. 
Operations upon fields from 
the input record are preceded 


. by the test for control field 


changes, the performance of 
total time calculations and 
the formation of total records. 
This means that an input 
record which causes a control 
change cannot contribute data 
to total records that result 
from that control change. 
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Columns FIELD NAME/Contents Explanation 
NOTES: 


1. Heading and detail records are 
distinguished only for the user's 
convenience. The RPG program 
treats both specification types 
in the same way. 


2. All heading records for a file 
must be entered first followed 
by all detail records and then 
by all total records for same 
file. 


16~18 RECORD ADDITION 


ADD Indicates that the output record is 
to be added to the file. 


NOTES: - 


1. These positions must be left 
blank if the contents of the 
output record are to be used 
to update or to create a file. 


2. Column 66 of the related file 
description specifications 
must contain an A if a record 
is to be added. 


3. Must appear on the same line 
as type H/D/T. 


See Figure 4.C for valid use of 
ADD specification. 


16 STACKER SELECT 


blank For card reader or punch; normal 
stacker always used. 


NOTE: 2 is valid for card punch 
¢CPzZ103 only. 
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Columns FIEW WAMB/contBHts 


17 SPACE BEFORE 


0 or 


ie SPACE AFTER 


ie] 


1 ox Bb 


19-20 SKIP BEFORE 


01-07. 


Explanation . 


valid for card reader/punch only. 


Indicates that an output card is. 
to be selected to stacker J. 


Used only for output files or com- 
bined files. 


When no specification is given in 
the stacker select field, all: 
tards from output and combined 
Riles are directed to the normal 
stacker for the unit used. 


ry 
Indicates that no spacing is to bé 
done before printing. 


Indicates that 1 space is to be 
used before printing. 


Indicates that 2 spaces are to be 
used before printing. 


indicates that 3 spaces are to be 
used before printing. 


Indicates that no spacing is to be 
done after printing. 


Indicates that 1 space 1s to he 
taken after printing. 


Indicates that 2 spaces are to be 
taken after printing. 


Indicates that 3 spaces are to -be 
taken. after printing. 


Indicates that the printer carriage 
ds to skip to channels 1 through 7 
respectively of the, control loop, 
before the line is printed. 


*yors: For an 'or! Line the blank has a special significance. tt ds 
tised to reqdest that the parameters specified on the previous 
dine be used fot the for! fine as well. 


Vitis 


Columns FIELD NAME/Contents 
21-22 SKIP_AFTER 
01-07 
NOTE? Channel 7 should always be 
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Explanation 


Indicates that the printer carriage 
is to skip to channels 1 through 7 
respectively of the control loop, 
after the line is printed. 


RULES 
1. At least one entry must be made 
in positions 17-22 if the 
recorad is to be printed. 


T£ SPACE BEFORE and SKIP BEFORE 
are specified for the same line, 
SKIP BEFORE is executed first. 
If SPACE AFTER and SKIP AFTER 
are specified for the same line, 
both will be executed. 


Tf, in an OR-relationship, space 
and skip specifications are 
entered in the first line but 
none are entered in the subse- 
quent lines, the specifications 
in the first line are taken to 
be valid for all subsequent 
lines. 


OF (OVERFLOW) INDICATOR WITH SKIP 


A test for end-of-page is made by 
the object program immediately 
before each line of the report is 
printed (after any SPACE BEFORE or 
SKIP BEFORE specifications are 
carried out). 


End-of-page, indicated by a punch 
in position 8 of th VFU loop, 
causes the indicator OF or OV to 
be turned on. It remains on for 
one complete cycle of processing 
(thus it is turned off after the 
heading and detail lines of the 
next record are printed). 


In this way, the OF or OV indicator 
may be used to control calculations. 


used for a new page. 
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Columns FIELD NAME/Contents 


Explanation 


RULES for Using OF or OV for Output: 


1. 
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At Detail Time 


When end-of-page is sensed at 
detail time, the remainder of 
the detail lines are printed; 
then the overflow indicator is 
turned on and the next record 
is read. If the appropriate 
conditions are satisfied, total 
calculations and total output 
are performed, then the ovex— 
flow lines are printed. The 
overflow indicator is turned 
off after. the next detail 
calculations, before the next 
detail output is printed. 


At Total Time 


When end-of-page occurs at 
total time, the remainder of 
the total lines are printed; 
then the overflow indicator is 
turned on. Overflow lines are 
printed if specified. The 
overflow indicator is turned 
off after the next detail 
calculations, before the next 
detail output is printed. 


Overflow Printing 


If an overflow indicator is 
specified for a line but not as 
one of the first three, it is 
used solely to condition output 
but not to request overflow 
printing. 


The object program prints over- 
flow lines in the following 
order: 


a. Total lines ‘conditioned by 
overflow are printed. 


b. Heading and detail lines 
conditioned by overflow are 
printed. 


Columns 


2331 


23 


24-25 


26 


27=28 


29 


30-31 
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FIELD _NAME/Contents 


OUTPUT INDICATORS 


blank 


(First Indicator) 


Nor 


{Second Indicator) 


NOT 


(Third Indicator) 
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Explanation 


AUTOMATIC SKIPPING 


If an overflow indicator is not 
specified as one of the first 
three indicators on an output 
specification form (columns 23-31) 
for any line of a print file the 
RPG object program generated 
automatically skips to a new page 
immediately upon detecting end-qf- 
page. 


NOTE: If an overflow condition has 
been specified automatic 
skipping is not performed, 


Specifies that the indicator which 
follows must not be on. 


Specifies that the indicator which 
follows is to be tested for an on 
condition for use. 


Specifies one of the RPG indicators 
to be used to condition the state- 
ment. 


See 23. 


Specifies one of the RPG indicators 
to be used in conjuneption with the 
one in columns 24-25 to condition 
the statement, 


See 23. 
Specifies one of the RPG indicators 
to be used in conjunction with the 


two in columns 24-25 and 27-28 to 
condition the statement. 
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Columns FIELD NAME/Contents 


RULES : 


1. Indicators may be used either 
for file and record identifica- 
tion or field description. 


2. When indicators are used for 
file and record identification, 
at least one indicator is 
required. In any case, a 
maximum of three indicators 
may he specified. 


3. Indicator specifications must 
start in columns 23-25. 


4. Indicators control: 


@ when the record is to be 
output; and 

e@ when a particular field 
is to be printed, punched. 
or written. 


5. When more than one indicator 
is specified in a given state- 
ment they are in an AND-rela- 
tionship. This means that all 
conditions specified must be 
Satisfied before the output 
operation can be carried out. 


6. More than three indicators in 
an AND-relationship may be 
specified by the use of addi- 
tional statements. The word 
AND is entered in positions 
14-16 of such additional state- 
ments. When one of the indica- 
tors to be used in this way is 
the OF (end-of-page) indicator, 
ait must appear in the first 
statement if it is to be used 
to request overflow printing. 
OF indicators specified in an 
AND line are processed during 
detail or total time,. depending 
on the type of main line. 
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Columns FI£LD NAME/< Explanation 

7. An output line may be condi- 
tioned by an OR-relationship 
among the indicators. This is 
accomplished by using output 
statements with OR in columns 
14-15 and the desired indicator 
specifications. 


8. Additional output statements 
May be used to specify as many 
output indicators - either in 
AND or OR relationships - as 
are require@. Each additional 
such statement must have AND 
or OR in columns 14-16. 


i NOTE: When AND is used, columns 
17-22 must be blank. 
~ # VALID INDICATORS AND THEIR USE 
: i 1. Resulting Indicators 
a. Refer to entries in columns 
19-20 of an Input Statement 
er 54-59 of a Calculations 
Statement. 
b. Specify the particular 
input record type on which 
the output operation is to 
be performed; or 
¢, Control the output opera~ 
tion by conditions that 
have occurreé during cal- 
culations, 
2. Field Indicators 
a. Refer to entries in columns 
65-70 of an Input Statement. 
b. Control the output operation 
by the status of the input 
field. 
3. + Control Level Indicators 
Cause the output to be performed 
only when the affected control 
break (L1...L9, LR) has 
occurred. 
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Columns FIELD NAME/Contents Explanation 


4. Matching Record Indicator (MR) 


Causes the output operation to 
be performed only if there is 
a matching record in a second- 
ary file. 


5. Halt Indicators (H1 thru H9) 


Are generally used to suppress 
the output operation when an 
error has been detected in the 
input data or during calcula- 
tions. 


6. Overflow Indicator (OF or ov} 


a. Causes the operation to 
take place only if end-of- 
page has occurred. 


b. Does not apply to the 
first page of a report. 


7. First Page Indicator (1P) 


a. Enables headings to be 
printed on the first page 
of a report. 


b. Is turned on only at the 
beginning of the process- 
ing before any input 
records have been read. 


c. Is designed to cause the 
printing of a cover sheet 
or page heading lines on 
the first sheet of a 
xyeport. 


NOTES: 


1. When identical heading lines 
are to be printed on each page, 
the overflow indicator and the 
first page indicator, must be 
specified in an OR~relationship 
because the overflow condition 
does not occur until after the 
first page has been printed. 
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Columns FIELD NAME/Contents Explanation 
2. At the beginning of execution 


of an RPG object program, the 
following indicators are 


always on: 
@ Blank indicators; 
@ Zero indicators; 
® First page indicators (1P); 
@ Level-zero indicators (LO). 


NOTES: The FIELD DESCRIPTION portion of the Output-Format Specifica— 
tions form (columns 23-70) provides specifications for: 


e@ The control of the individual fields of a record. 
@ The output format of individual fields of a record. 


RULES: 


1. When Output-Format statements are used for field description, 
columns 7-22 must be blank. 


2. The fields of a record are described in statements immediately 
following their corresponding file statements. 


3. Each field is described on a separate line. 


4. Ordinarily, the rightmost position of a numeric field contains 
the sign. An ll-punch designates a negative value. Therefore, 
iff a numeric field is printed the rightmost position in the 
output field will contain one of the letters A-R or one of the 
special characters having the same zone. 


23-31 OUTPUT INDICATORS 
(as per OUTPUT INDICA- EXCEPTIONS: 


TORS discussion for 
the File Identification 1. The maximum number of indica- 


and Control portion tors that can be considered to 

above) be in.an AND-relationship is 
three for each field descrip- 
tion line, 


2. Output indicators must not be 
specified in an OR-relationship 
on a field desczviption line. 
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FIELD NAME/Contents 


FIELD NAMB 


AKXKXX 


Explanation 


Up to 6 alphameric characters, of 


which the first must be alphabetic. 


The entry is left~adjusted in the 
field; no special characters or 
embedded blanks are pexmitted. 


This entry identifies the field 
which is to become output. 


RULES : 


i. The field name must have been 
previously defined in either 
an Input statement or a Calicu- 
lation Statement. 


2. Field deseription statements 
may appear in any sequence, 
The order in which they appear 
in the output record is deter- 
mined by the entry in colums 
40-43. 


3. When a constant is written in 
columns 45-70, the field name 
must be blank. 


Automatic page numbering is a 
feature of RPG. By placing the 
word PAGE in columns 32-37 (FIELD 


NAME) of the output specifications, 


automatic page numbering will be 
obtained on the printed report. 
The number is always four posi- 
tions long. However, zero sup— 
pression or editing must be speci~ 
fied by the user. The page number 
is increased by one before it is 
printed. 


Page numbexing normally begins 
with the number 1, but page num- 
bering can be started with any 
number by preparing a record type 
that contains the starting page, 
less 1. In this case the record 
must be defined on the Input Spe~ 
cifications form with a field 
labelled PAGE. 
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Columns FIELD NAME/Contents 
38 ZERO SUPPRESS 
Zz 
biank 
39 BLANK AFTER 
B 
blank 
7 
o 


Explanation 


A page number can be reset to zero 
and a new series of page numbers 
may be started during the process- 
ing of the object program. When 
PAGE appears in the field name of 
the Output Specifications form, the 
output indicators are used to reset 
the page to number 1. In this case, 
the indicator must be placed in 
Output Indicators on the same line 
as the field name specification 
PAGE. 


Any output indicators specified in 
a PAGE line are checked before 
printing. If the conditions of 
the indicators are satisfied, the 
page counter is reset to 1, instead 


. o£ being incremented by 1. 


Indicates that zeros to the left of 
the significant digits, and the 
sign on the unit position, are not 
to appear in the output record. 


Invalid for format or edit control 
word-specification. 


Indicates no zero suppression. 


Indicates that the output field is 
tol be reset to blanks or zeros 
inmediately after the information 
transfer has'been carried out. 


@ Alphameric fields are'set to 
blanks; 

@ Numeric fields are set to 
zeros. 


Reset not requested. 
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FIELD NAME/Contents 


END POSITION IN OUTPUT 


RECORD 


monn 


PACKED FIELD 


P 


blank 


Explanation 


RULES for BLANK AFTER: 


1. A field for which a BLANK 
SPECIFICATION is given is set 
to blank or zero after the 
record in which it appears has 
been written. 


2. When a field is set to zero all 
indicators used as zero result 
indicators associated with that 
field are set on. Plus and 
Minus indicators are ignored. 


3. When a field is set to blank 
all indicators used as blank 
result indicators associated 
with that field are set on. 
Plus and Minus indicators are 
ignored. 


4. When a field to be set to zero 
or blank is a constant or 
literal that ‘constant remains 
blank and a numeric literal 
remains zero for all subsequent 
uses, Constants and literals 
are stored only once in the RPG 
object program and once made 
zero or blank the fields that 
contained them remain zero or 
blank. 


Up to 4 numeric digits, right- 
adjusted; leading zeros may be 
omitted. 


Indicates the exact location in 


* the output record of the right- 


most (low-order) character of the 
field. 


Indicates that the output field is 
to appear in the packed decimal 
format. 


All other specifications. 
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FIELD NAME/Contents 


CONSTANT 


(1 to 24 alphameric 
characters; left- 
adjusted; enclosed 
in apostrophes) 


EDIT WORD 


(1 to 24 alphameric 
characters; left- 
adjusted; enclosed 
in apostrophes) 


Explanation 


Provides a constant field for 
inclusion in output records. 

Appears in the output record 

according to the end position 
designation. 


RULES for Formation of Constants: 


1. Any character in the GE 120/130 
gxaphic character set (includ- 
ing blanks) may be used. 


2. An apostrophe (') within the 
constant must be represented 
by two consecutive apostrophes. 


Provides for the punctuation of 
amount fields, including the print- 
ing of dollar signs, commas, 
periods and sign status. Edit 
words can also be used to suppress 
leading zeros, either throughout 
the field or in a designated part 
{asterisk protection). 


RULES for Formation of Edit Words: 


i. An edit word consists of three 
logical parts: 


® the body - governs the 
transfer of the data field 
to the output record; 
begins at the leftmost 
character of the edit word 
and contains the same num- 
ber of blanks (one zero or 
+ an asterisk) as the number 
of digits of the data 
field. 
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FIELD NAME/Contents 
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Explanation 


e@ the status portion - dis~ 
Plays the status (positive 
or negative) of the data 
field; continues to the 
right immediately follow- 
ing the body and extends 
to the CR (Credit) or - 
(minus) symbol. Edit 
words which do not contain 
either CR or the - symbol 
have no status portion. 


@ the expansion - remains 
unchanged; continues to 
the right from the status 
portion (or body portion, 
if there is no status por- 
tion) and ends with the 
rightmost character of the 
edit word. 


An edit word must be enclosed 
in apostrophes. 


A blank in the body portion of 
the edit word is replaced with 
the character from the corres- 
ponding position of the data’ 

specified in the field name, + 


An ampersand in the body or 
status portion causes a blank 
in the edited field. It 
remains unchanged in the 
expansion portion, 


TE the bedy portion of the 
edit word contains no zero or 
asterisk, zero suppression is 
performed for the entire edit 
word. ‘This means that all 
characters to the left of the 
first significant digit are 
reset to blanks. 


A dollar sign that is entered 
in the leftmost position of 
the edit word (fixed dollar 
sign) will be printed in that 
location. For all following 
positions zero suppression or 
asterisk protection as des- 
exibed above in item 5 is per- 
formed. 
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. Columns: FIELD NAME/Contents 


7. 


10. 


Explanation 


\ 
A dollar sign in the body of 
the edit word in any position 
other than the leftmost posi~ 
tion (floating dollar sign) 
that is written immediately to 
the left of the zero suppression 
code (0) causes the insertion 
of a dollar sign in the position 
to the left of the first 
significant digit. 


The decimal point, commas, and 
all other characters used in 
the body portion of the edit 
word are printed in the edited 
output field in the position 
specified in the edit word, 
unless they are located to the 
left of significant digits. 

In the latter case they are 
reset to blanks or replaced by 
asterisks. 


The status portion containing 
the CR or the minus (-) sign 
remains unchanged if the sign 
of the data is minus. If the 
sign is plus, the whole status 
portion is reset to blanks. 


The expansion portion of the 
edit word is undisturbed. 
(Its normal use is for indi- 
cating a specific class of 
totals by means of asterisk 
symbols.) 


NOTE: No decimal alignment is 


VETI-18 


performed between edit 
words and data fields in 
an RPG object program. 


c. 
1. 


GE 120/130 RPG USER'S GUIDE 
THE OUTPUT~FORMAT SPECIFICATIONS FORM 


Columns FIELD NAME/Contents Explanation 


71-74 STERLING SIGN POSITION 


s Indicates that the sign of the 
sterling-currency field is in the 
normal position. Entered in 
column 74. 


nnnn Up to 4 numeric digits, right- 
adjusted; leading zeros may be 
omitted. 


Identifies the position in the 
record that will contain the sign 
of the sterling-currency field. 


blank Indicates that the field is not a 
sterling field. 


SOME PROGRAMMING CONSIDERATIONS FOR QUTPUT-FORMAT SPECIFICATIONS 
Page numbering 


During the processing of an RPG program it is possible to reset the 
page number, automatically managed by RPG, to zero. ‘This may be 
done to start a new series of page numbers at logical divisions of 
information in a given report. Control breaks might be used to indi- 
eate the logical divisions of information, for example. Then, in 
this use, major control level indicators would be written in OUTPUT 
INDICATORS on the same line as that in which PAGE is specified as a 
FIELDNAME, Output indicators specified in a PAGE line are checked 
before printing, If all conditions are met the page counter is reset 
to 0 before being incremented by 1. Care must be taken in using the 
PAGE specification. PAGE is used for a printer with one carriage 
(and for the first carriage on a two carriage printer where such is 
supported; PAGE] in this case is used for the second carriage]. 


Adding records to files 


The programmer must know his data structure well and must be assured 
that space is available for adding records to a file for which ADD 
is specified in columns 16, 17, 18. [STACKER SELECT, SPACE BEFORE 
and SPACE AFTER - all of which have no meaning for dise files; disc 
files alone may have records added to them.] 
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Print errors 
The EIOS [Extended Input/Output System] utilized by RPG does not 
attempt any error correction for errors on printing. RPG object 
programs therefore turn on HO and continue. The programmer must 
take whatever action is required te prevent program halt. 
An optional alternative is offered, however. If the programmer 
places the name of an external subroutine in columns 40-45 of the 


RPG card the object program will branch to that routine for print 
errors. In such cases HO is not turned on, 


Blank after specifications 


BLANK AFTER specifications must be used with discretion. A field for 
which a blank after option is specified will be set to blank (or 
zero) immediately after movement to the output record. When a field 
appears more than once in the same record the blank after should be 
written for the last specification of that field only. 


ERROR ACTION 

In general, GE 120/130 RPG attempts to compile a source program effec- 
tively by supplying usable values in specifications that contain 
errors. However, when an error is of a nature that makes such 

action unfeasible the erroneous specification is disregarded. 


The following errors cause a specification to be ignored in process- 
ing; 


@ The FILENAME refers to an undefined file or a file which 
cannot be an output file; 


@ An AND record is the first output specification for a file or 
occurs for an invalid filename; 


@ An AND or an OR record follows a field specification; 

@ Record and field specification appear on the same line; 
@ A record type specification is out of order or invalid; 
@ No OUTPUT INDICATORS are specified for an AND or OR line; 
@ END POSITION is invalid or missing; 

© A CONSTANT is not left-justified; 


@ The FIELD NAME is undefined. 
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SOME SAMPLE OUTPUT-FORMAT STATEMENTS 


Print file with floating dollar sign and first page specification 
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The file OUTPUT - name in FILENAME, columns 7-12 - is specified on’ 
the associated File Description as a print file. 


The first line to be printed, a heading - H in column 15 - will be 
printed after a slew to a new page - 07 in SKIP BEFORE, columns 19-20. 


A space will be taken after the heading is printed - 2 in SPACE 
APTER, column 18. 


The heading record specified on line 010 will be printed only on the 
first page - IP in OUTPUT INDICATORS, columns 24-25 and not on over~ 
flow pages - NOF in OUTPUT INDICATORS, columns 26-28. 


Heading text is given on lines 020 and 030 and will be positioned as 
specified by the END POSITION as described in columns 42-43, 


A second heading, specified on line 040 ~ is printed on the first 
page or when overflow occurs - OR in columns 14-15 of line O50 and 
OF in OUTPUT INDICATORS, columns 24-25. 


Each of the text words is given as a constant on a separate line, 
with placement specified. 


Line 090 specifies a detail record - D in column 1S. The line is to 
be printed when indicator 20 is on - 20 in OUTPUT INDICATORS, columns 


24-25, and 10 is not on - N10 in columns 26-28 and 40) is not on N40 
in 29-31, 


Each of the fields PROFIT - line 100 and AMOUNT - line 110 are 

numeric; the EDIT WORDs for these fields - columns 45-46 - have 
floating dollar signs - $ immediately before the 0. 

Both fields are set to zero after output ~ B in BLANK AFTER, column 44. 


The field ADD is not edited. 


VITI-21 


2. 


GE 120/130 RPG USER'S GUIDE 
"HE OUTPUT-FORMAT SPECIFICATIONS FORM 


Print file with fixed dollar sign and zero suppression 


€ 10 Sous REPORT PROGRAM GENERATOR OUTPUT.FORMAT SPECIFICATIONS 
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CONRPT, the file named in FILENAME, columns 7-12, is a print file. 


Lines are to be printed at detail output time - D in TYPE, column 15, 
To condition printing, OUTPUT INDICATORS 30 and 12 (columns 26-31 of 
line 010) and indicator 61 (AND in positions 14-16 of line 020, indi- 
cator specified in columns 23-25) must be on and indicators 12 
{columns 23-25, N in 23 in line 010) and 20 (columns 26-28 of line 
020, N in 26) must not be on. 


Leading zeros are to be suppressed in the field NOM described in 
line 040, 2 in ZERO SUPPRESS, column 38. 


The field PRICE has a fixed dollar sign - first position in the EDIT 
WORD in columns 43-58, 


After it is moved for printing the field NOM will be set to zero - 
B in BLANK AFTER, column 39. 


Page numbering 
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The file XYZRPT will be page numbered consecutively by the’ RPG object 
program. PAGE is the numbering field. ‘The number is always four 
positions long and will therefore be in positions 77-80, 80 in END 
POSITION IN OUTPUT RECORD, columms 40-43, 


Leading zeros will be suppressed - Z in ZERO SUPPRESS, column 38. 
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4. A_disc file with addition of records 
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The file DISKO is to have a detail record added, D in TYPE, column 15 
and ADD in columns 16-18. ‘Indicators 43, L2 and 12 condition the 
addition of the record. 


The field KEYFLD is identified as a key field - K in END POSITION in 


OUTPUT RECORD field, column 41 to the immediate left of the right- 
adjusted position specification. 
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TX, USER SUBROUTINES 


INTRODUCTION 

The EXIT operation provided in RPG Calculations offers the user the 
facility of transferring control from the RPG object program to some 
section of APS statements treated as a subroutine. 

Such subroutines might be standard processes which have been pre~ 


viously written in APS or they might be special purpose sequences 
designed to interface with a given RPG program. 


USING RPG STATEMENTS FOR SUBROUTINE LINKAGE 


Statements provided by RPG 


{here are statements provided by RPG to effect: 
@ transfer of control to the subroutine - the EXIT; 


@ cross reference between fields and indicators defined in RPG 
and the user routine - RLABL; 


@ cross reference between fields defined in the user's routine 
and the RPG program - ULABL. 


A means of return to the RPG program is implicit in the jump generated 
for subroutine entry. 


GE 120/130 RPG accepts RLABL statements: but does not require or process 
them except by checking them. ULABL statements are required to pre~ 
vent multiple field definition in the user program and by RPG. 


How to write RPG subroutine linkage statements 


EXIT 


Columns 7-8 A control level may be entered to distin- 
guish total and detail time processing. 


columns 9-17 Indicators may be entered to specify that 
the subroutine be carried out only when 
certain conditions axe satisfied. 
When no indicators are used in 7-17 the EXIT 
takes place every time detail calculations 
are performed. 


Columns 28-31 EXIT 


Il 
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Columns 33-38 A subroutine name; a maximum of 6 characters 
the first of which must be alphabetic. 


The subroutine so named must follow the RPG 
source program. It must be written in 
error-free APS statements. 


RLABL 

Columns 28-32 RLABL 

Columns 43-48 The name of the RPG defined table or the 
field to be referenced. 

Columns 49-51 Field length, if not given previously in 
another specification. 

Column 52 Decimal indication. 


The RLABL statement serves in GE 120/130 RPG as a user check on the 
definition of a field he is- using in a subroutine. Reference to RPG 
defined fields is possible without an RLABL. However, wherever an 
RLABL is used it should conform to the field definition rules of RPG. 


The user may freely refer, in his subroutine, to any field he has 
specified in his RPG program. Proper programming procedures must be 
obsexved; fields should be used in subroutines in accordance with 
their definitions in the RPG program, 


ULABL 

Columns 28-32 ULABL 

Columns 43-48 The name of the field defined in the user 
routine, 

Columns 49-SL_ - Field length. 

Column 52 Decimal positions. 


GE 120/130 RPG does not generate any code using ULABL fields. ULABL 
specifications are required to prevent, multiple definition of fields . 
used in RPG and the user routine. 


WHEN _AN_EXIT OCCURS 


According to the physical position of the EXIT operation in a set of 
calculations specifications, one of the following cases is possible: 


EXIT Pirst Detail Exit occurs prior to any calculations; 


immediately after the sequence which moves 
data from an input record. 
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uXIT Last Detail Exit occurs immediately before heading 
xecords are written, 


@) EXIT First Total Exit occurs at the end of the input routine; 
after determination of record type and tests 
for control break. 


EXIT Last Total Exit occurs immediately before the total 
records are written. 


An EXIT within a detail or total sequence causes a jump to the named 


subroutine as a normal calculation operation in the applicable 
sequence. 


O. INTERFACING WITH THE RPG OBJECT PROGRAM 


To ensure effective interfacing between his subroutine and the RPG 
object program the user should: 


eae 


@ Avoid using input/output in his subroutines; 
@ Use register 7 to return to the RPG object sequence; 


e Save all registers used in his subroutine and restore them 
before returning to the main sequence. 


@) ® Observe the RPG conventions for field format and indicator 


settings. All numeric fields are packed decimals. Indica- 
tors have the hexadecimal value 00 when off and FO when on. 


E. RESTRICTIONS 

» User subroutines may not include segmentation or the SECT statement. 
° RPG defined fields may not be referenced in ULABL statements. 
ty NOTE: It is the user's responsibility to ensure that his subroutines 


i conform to the rules for APS programs. The GE 120/130 RPG does 
| not perform error checking. 

i 

t 

} 


Figure 9.A illustrates the format of user subroutine statements. 
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X, RECORD ADDRESS FILES 


A. FORMAT 


Record Address (RA) files, used to reference other files on disc, 
are always sequential files. They may be card, tape or disc files. 
Two different types of RA files are used by GE 120/130 RPG; absolute 
record addresses and data fields which may be converted to absolute 
record addresses, page or track addresses. 


1. Absolute addresses 


Absolute record address files are most usually the output of a 
system sort which develops an 8 character absolute address. 


2. Fields for conversion 


Record ad@ress files containing fields for conversion must be pro- 
cessed by some subroutine to yield record addresses. Any of the 
addresses acceptable by EDOS may be generated from an RA file, 
according to the algorithm used te develop the fields which serve 
as references to associated records. 


The length of individual entries in such files is a function of 
the data used and the conversion method. 


B. USING THE RECORD ADDRESS FILE 


An RA File is a guide for a method by which records from an asso- 
ciated file are selected for processing. The RA file is read, the 
record is converted if required, and the resulting address is used 
to locate a record on another file. It is the associated file 
which supplies input data for processing in the RPG program., ~ 


RA file formats are described on File Description statements; 
record characteristics are further described on File Extension 
statements. The name of any required conversion routine appears 
on the File Extension statements. Calculation statements are 
used to provide an exit to an external subroutine or for a con- 
version written in RPG. 


A: 
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XI, TAPE FILES USED IN RPG 


Information contained in this chapter is designed 
to familiarize the reader with the structure of 
tape files processed by GE 120/130 software. 


- BATA STRUCTURE 


Data written on 7 track tape mst contain only characters with a 
binary configuration corresponding to one of the 64 graphic charac- 
ters (see Figure 7.D). 


Physical record 


Each data transfer records a block of data which is called a physical 
record. 


Logical record 


Within any physical record there may be one or more distinct sub 
groups of data called logical records. 


Types of logical records 


There are two types of logical records that may form part of a 
physical record: 


@ Fixed length records, i.e., records which contain the 
same number of characters, 


While fixed length logical records contain the same 
number of characters it is not necessarily true that the 
physical records containing them be of equal length. 


For example, groups of equal numbers of some fixed 
length logical records might be written. 


Uniess the multiple chosen is a submultiple of the 
nunber of records being written the last physical record 
will contain fewer logical records that the others. 


@ Variable length records, i.e., records of different 
length occurring in the same physical record. 
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Figure 11.A below illustrates the structure of physical records 
on tape. 


Figure 11,8 illustrates the structure of logical records. 


Block 
Sequence 
Number Data 
| Ts | = ea, 
Physical Logical 
Record Record 


(Block) 3 


FIGURE 11.8 A PHYSICAL RECORD 


Data 
a 
Cc ay 
Fixed Length 
Logical Record 
Record 
Length 
Field . Data 


a eA RSE) 


Variable Length 
Logical Record 


FIGURE 11.B LOGICAL RECORDS 
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Oo B. DATA BLOCKS 


Sequences of data characters written on tape in a single write opera- 
tion are also referred to as data blocks. 


Each data block can contain as few as fe characters and as many as 
27,000 characters. 


The size of any given block may vary within these limits. 


The format of a block of data on tape may be standard or non-standard. 


1. Standard blocks 
A standard data block consists of two logical parts: 


e A block sequence number - a 5 digit decimal number, placed on 
tape in the first five character positions of the data block. 


Each such sequence number is thus a unique identifier for the 
data block it precedes. | 


e The data itself - one or more fixed or variable length 
‘logical records. 


2. Non-standard blocks 


The format of a non-standard block is left to the discretion of the 
user. The user is advised not to use non-standard format. 


oes When data blocks are recorded on tape each data block is preceded 
oO and followed by an inter-record gap. ‘he inter-record gap defines 
the start and end of each block. fe 


Figure 11.C below illustrates the format of standard data blocks on 
9-track tape.- 


one block 


xKXxXxXKXxX'x x x. xxx 
HERE EPE REE ER EEE ELE EE EERE. 
xXx*¥xXxXxxXxXxXxX xx xX xX xX¥xXxXxXxxxX " xx xXx 
X¥XXXXXxXxXX XXX XX KX KX XX inter- XXX xX 
X¥xXxXXXxXxXxXxKXXxXxXKXXx xX xxx xX 
KEXXXXXKXXXXE REX XXX record XxX X 
KHEXKKXKXXKXKXXKKXXKKKXXKX x xX KX 
EXXXXXXXXKX ERE XX XX XX gap XXxXX 
XE¥XXXXXXXKXXXX XX XX XX xXx xX 
1234567 8 9 1011121314151617181920 1234 | 
ee 

block data 

sequence 

number 


FIGURE 11.C STANDARD DATA BLOCK ON 9-TRACK TAPE 
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A group of blocks containing related data constitute a data file. *) 


A given data file may residé on one or more reels of tape; only one 
file may reside on any given reel of tape. 


¢ Files are referred to as? 


® Standard - when they contain standard data blocks, preceded. 
and followed by file identifier blocks. 


® Non-standard ~ when they contain non standard data blocks, | 
with or without standard file identifier blocks. 


‘* File identifier blocks *) 
A standard file is preceded by the following special blocks: 
. 1. Interchange Label - an 80 character block containing: 


@ a six digit reel serial number assigned to the reel by 
the installation; 


® up to ten character user identifier or name. 


Figure 11.p below illustrates the interchange label, \*) 


Unused 


INTE exer OR KAKA ARKAAN AKAN AIALIALAKAAICA NNN I AAAKKAAK ANH AKA BHAA ANI IK, (@] 
torts roth. ailaa sib edt 


FIGURE 11.D INTERCHANGE LABEL 
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Oo 2, Header Label - an 80 character block containing: 
@ up to 12 character file name; 


@ a six digit serial number identifying the first reel ina 
given file; 


@® a six digit sequence number identifying the reel in 
process; 


@ the date of creation of the reel in the form: 


Kyvddda; where yy are the last two digits of the year 
and ddd is the day of the year; 


@ a6 digit expiration date for the data on the file; the 
re) format is the same as that for creation date. 


Figure 11.£ below illustrates the header label. 


Reel| Crea- 
; Base Beq,. tion |Purge 
File Name Reel | No. Date |Date 


(@) sige ia an ss ig eh Cc syd Br SL aaa 
fi atts 172s faa ta ke fr -aot 


FIGURE 11.E HEADER LABEL 


3. Tape Mark ~ a one character indicator to signal that the block 
which follows is the first data block of the file. 


Figure 11.F below illustrates identifier blocks. 


Tape Trailer Tape 
Mark Label Mark 


FIGURE 11.F. IDENTIFIER BLOCKS WHICH PRECEDE FILES ON TAPE 
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A standard file is followed by the special blocks. 


i. Wape Mark - a one character indicator block that signals the end 
of the last data block of the file. 


2. Trailer Label - an 80 character block which cuvtsins: 


@ §EOV - if the label follows the inst block om a reel but 
not the last block in thn. #ile. 


« EOF ~ if the label follows the last block in the file. 
‘ead digit block count. 


Figure 11.G below illustrates the form of the trailer label. 


| i 3 | 
Unused ct Unused 


ROVING DOT ROROCOC COTE COCK OG CROO COO IE A/C ON0R 707 DEA IOS OCI IOI, 
1 or 34 #566 606% aot 
EOF 


FIGURE 11.G TRAILER 2AB; 


Figuxe 13.4 illustrates the general stm:ctme of files on tape. 
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XII, DISC FILES IN RPG 


Information contained in this chapter is designed 
to familiarize the reader with the structure of 
disc files processed by GE 120/130 sequence. | 


THE FORMAT OF A DISC PACK 


A disc pack corresponds to a reel of tape in its function as a unit 
of external storage for data. Where a tape, however, contains such 
data in a sequential stream the disc contains it in circular tracks 
which permit access in non-sequential fashion. 


A circular path on a disc is called a track. Each track is divided 
in 10 parts called sectors. A group of ten tracks is a cylinder. ! 
There are 203 cylinders in a disc pack. v 


Each sector of the disc has a number which is its address, the means 
of referencing the information recorded on it. Data is recorded 
serially within the sectors, 


STRUCTURE OF INFORMATION 
The page - a physical unit - 


Fixed length physical elements called pages are used to write infor- 
mation on a dise file. Each page always begins at the start of a | 
sector. It can be addressed by the number of the first sector used. 
Each page has a minimum length equal to 75 characters and a maximum 
length equal to 4096 characters. 


Logical units ~ the record 


A page may contain one or more logical elements or records, These 
records may be: 


e@ fixed length - limited in that a record may not exceed a 
page in length; 


@ variable length - limited to a 1023 character maximum. 
A page need not be entirely filled. 
The structure of records varies with record type, i.e., fixed or 
variable and with file structure, i.e., sequential or non-sequential. | 


Table 12.A below lists the characteristics of the several different 
disc record structures. 
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Record And Chaining* 

File Types Record Pield Max Last 

Type Code (Record Position 
Concatenation) 


Fixed length Position 2en ntl + Page 
Non-Sequential 1 n < 1014 Length 
Fixed length Position 2en n+l + nt+5 nt+6 > Page 
Sequential 1 nh < 101) Length 
Variable length | Position mt+6 + 1023 
Sequential 1 


NA = not applicable 


| *Required for addition of records to an overflow area only. 


PIGURE 12.A TABLE OF REQUIRED FIELDS FOR DISC RECORDS BY FILE TYPE 


€. FILE ORGANIZATION 


Piles are considered to be set up in one of three organizational 
patterns: 


@ sequential 
e@ indexed sequential 
e@ random (or direct). 


The pattern chosen is dependent upon the content and use of a given 
file. The meaning of the three organizations is given below. 


1. Sequential files 


In sequentially organized files individual records are placed in the 
one after another. Thus the logical sequence of records corresponds 
to physical sequence. This is the organization of tape and card 
files. 


For sequential organization there is no rule which associates a record 

| with its address on disc. A record of key x in a sequential file 
sorted in ascending order must come after the record with key x-1 and 
before the record with key x+l. ‘This is not exact address informa- . 
tion, however. It is positional information. Record search in this 
ease is carried out by running the file sequentially and systemati- 
cally comparing the key found with the key sought. 


*Keys may have a maximum length of 99 characters. However, where indexed- 
sequential organization is used it mist be noted that the maximum length 
for an index is 28 characters in 8 bit mode. 
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2. Random or direct files 


When records are entered into a file in locations calculated as a 
function of the record key the file is said to be.organized directly. 
This means that every record can be accessed directly by means of its 
address, developed from the key. An alternate term for this organi- 
zational pattern is random. x 


The use of random organization presupposes the existence of a rule of 
conversion whereby a record key can be converted into a track or page 
address. Such conversion rules are determined by the designer of the 
file. There are two basic criteria which should be met in the 
development of such rules: 


@ to ensure that all possible records with keys that produce 
the same address (synonyms) are within the addressed unit,, 
i.e., page or track; 

@ to restrict the unused dise zone to a minimum. 


Conventions for random files 


The following conventions must be observed in setting up random 
files: 


@ Records must be fixed length. 
@ Each page must always be wholly contained in a track. 


3. Sequential files with index 


Records are entered into sequential files with index in the same way 
as in sequential files. However, the sequence of records depends on 
a key field, as does the sequence of direct files. Thus, records may 
be retrieved from such files in either sequential or random mode. 


an index is used to retrieve records directly. The index associated 
with a file has three parts: 


@ the file index; 
@ the master index; 
@ the track index. 


The index always occupies a whole cylinder. 
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D. THE OVERFLOW ZONE ON DISC 


Records may be inserted in a sequential file without requiring that 
the file be rewritten. An overflow zone is used for this purpose. 


Records placed in an overflow zone are linked to the xecords they 
follow by means of the concatenation field in those records, There- 
fore, provision must be made fox the 4 charactex concatenation field 
whenever overflow zones are to be used. 

An overflow zone is associated with a file at the time it is created. 
Records in an overflow zone are written in pages of a single record 
to make them individually addressable. 


File additions to sequential files in RPG presuppose the availability 
for use of an overflow zone. 


E. DISC LABELS 
There are two types of labels on disc. They are: 


® The Volume Label; 
@ The File Labels. 


The structure of these labels is as shown below. 


1. The volume disc pack label 


The volume label contains the following information: 
char. 1-4 - identification code: VOL1 
char. 5-10 - volume serial number, in alphamexic characters 


char. 11 - code number for disc type: 1 DSU 160 
2 psu 110 


char. 12-41 - not used 
char. 42-51 - user name 
char. 52 = blank 
char. 53-73 - not used 
char. 74 - blank 


char. 75-288 ~ not used 


The volume label is written by means of the .DHW control card, 
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The file labels 

The file label contains the following information: 
char. 1-4 ~ identification code HDRIL 

char. 5-16 - file name, in alphameric characters 
char. 17-21 - not used 


char. 22-27 - volume serial number of the first pack in the file; 
alphameric 


char. 286-31 - volume disc pack sequence number within the file; 
numeric 


char. 32-34 - blank; not used 


char. 35 - reserved for code that can assume one of the following 
values: 


V = multi volume file 
F = single volume file 


char. 36 - reserved for code specifying file writing mode: 


char, 37-41 - address of the first free sector in the zone reserved 
for file; that is the address of the first sector 
following the last page written in the file. 


This information is significant for sequential files 
only, 


char. 42-47 - file generation date, expressed in the form: }YYDDD 
char. 48-53 - file retention date, expressed in the form: }YYDDD 


char. 54 - file type code, It can assume one of the following 
values: 


s sequential file 
R= random file 
Vv empty file, that is, available for writing 


“ 


char, 55-57 - first cylinder address of the first zone occupied by 
file 


char, 58-60 ~ last cylinder address of the first file zone 


char. 61-63 - first cylinder address of the overflow zone for 
sequential files. Blank for random files. 
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char. 


char. 


char. 


64-66 


67-71 


72—74 


75-288 


The file label 
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last cylinder address of overflow zone for sequential 
files. Blank for random files. 


address of the first sector of the free zone in the 
overflow area for sequential files. Blank for random 


files. 


address of the cylinder containing the index for 
sequential files. 


not used 


Blank for random files. 


is written by means of the appropriate file define 
ecard for the type of file described. [See EDOS order cards for file 
definition orders.) 
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XHIT. USING MULTIPLE INPUT FILES IN GE 120/130 RPG 


There are two methods of processing multiple input 
‘files. They are: 


@ the matching record technique; 
@ chaining by designated fields. 


Chaining is meaningful only in the context of multiple 
files; matching has implication fox the processing of 
a Single sequential file. 


A discussion of each of these techniques, with examples 
of specifications for their use illustrates the way 
GE 120/130 RPG treats input files. 


MATCHING 


The technique of matching is essentially that of comparing data 
fields from one or more files. Comparison is, of necessity, ordered 
and may be ascending or descending. As a result of the comparison 
of programmer selected fields called matching fields a given record 
is selected for processing, or rejected. 


Definition of matching fields 


Matching fields are used only in the processing of sequential files, 
(i.e., files in which records are sorted in ascending or descending 
sequence, by up to ten key fields). 


There axe two distinct functions pexformed by the use of matching 
fields: 


@ Collating Sequence Checking - within all files that have 
specified matching fields. 


@ Record Selection for Processing - if both primary and 
secondary files were specified. 


Conventions for using matching specifications 


l The ALTSEQ option, specified on the .RPG card, allows the 
collating sequence of the sorted input data to be different 
from the internal GE 120/130 collating sequence. The user may 
specify in an ALTSEQ subroutine whatever conversion he wishes. 
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2. The file sequencing specification, on a file description card 
is used to specify whether the file is sorted in ascending or 
descending collating sequence. 


Sequence checking 


The specifications of Ml through M9 cause these fields in each record 
designated for matching by their use to be compared for sequence 

with those of the record which was previously read. If an out-of- 
sequence condition occurs the halt indicator HO is turned on and 
processing stops when the record is selected for processing, unless 
the indicator HO is turned off by the SETOF operations. ‘This function 
is most useful in checking the sequence of card files. 


An example of the use of sequence checking 


Figures 13.A and 13.B illustrate the specifications and data for 
the use of sequence checking. Discussion follows the examples. 
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FIGURE 13.A SEQUENCE CHECKING EXAMPLE 


The cards with matching fields shown in Figure 13,A are the only 
ones which are sequence checked. ‘The checking is performed 
according to the Input Specification shown above as follows: 


Card Number M3 M2 ML 

a ‘ 
o2 OOOL BLU 000259 
03 ? 0001 WHI 900300 
06 0002 BLU 000620 
07 0002 BLU 000700 
08 0002 BLU 000515 


All cards are in sequence except card 08. Therefore the program 
will stop after the processing of card 08 and will not process 
card 09 unless HO has been turned off by a SETOF instruction. 

hs 
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ya a a 


PIGURE 13.B SAMPLE INPUT DECK 


XUII-3 


GE 120/130 RPG USER'S GUIDE 
USING MULTIPLE INPUT PILES IN GE 120/130 RPG 


Record selection 


The specification of fields M1 through M9 in the case of multiple 
input files allows the user to control the order in which records 
from each file are processed. This function is most useful in the 
updating of a master file. If an internal indicator (MR) is set on 
to allow the user to control the processing. 


The MR indicator is turned on for a control group when a secondary 
file record matches a primary file record. All primary records of a 
matched control group will be processed before the first secondary 
record. The MR indicator is on during the complete processing of 
the group and is turned off at the completion of total time for that 
group. - 


If there is no match of the secondary file to the primary, the MR 
indicator is not turned on. ‘Thus, the MR can be used to control 
operations indicated on the Calculation and Output-Format Specifica- 
tions forms. It can be used to select processing on unmatched primary 
and secondary cards. If no match is found on the matching fields, the” 
object program processes whichever record is next in the sequence. 


An example of the use of record selection 


Figures 13.C and 13.D illustrate the specifications and data for 
the use of record selection. Discussion follows the examples. 
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FIGURE 13.C RECORD SELECTION EXAMPLE 


The Input Specifications shown in Figure 13.C illustrate a record 
selection program, 
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MASTER FILE ADRFIL 
PRIMARY 1st SECONDARY | . 2nd SECONDARY 


FIGURE 13.D ORDER OF RECORDS IN FILES FOR SELECTION 


Figure 13.D shows the structure of the 3 files involved in the record 
selection process. 


The xecords shown above are to be processed in the following way 
according to the specifications in Figure 13.C. 


Customer Resulting MR Indicator 


Record Number File Number Indicator 


1 * CARDIN _ 04 OFF 
2 ADRFIL oL 05 OFF 
3 CARDIN 02 02 OFF 
4 CARDIN 02 02. OFF 
5 CARDIN 02 03° OFF 
6 ADRFTL 02 05 OFF 
7 MASTER 03 o1 On 
8 ADRFIL 03 05 oN 
9 ADRFIL 04 os OFF 
10 . MASTER os; OL ON 
1. CARDIN - 05. 02. ON 
12 ADRFIL > 05 05 ON 
13. MASTER 06 * OL. OFF 
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Had CARDIN been the primary file and MASTER the first secondary file 
the records would have been selected as shown below. 


Customer Resulting 
Record i 
cord Number File Number Indicator MR Indicators 


1 CARDIN _ 04 OFP 
2 ADRFIL 01 05 OFF 
3 CARDIN 02 02 ON 
4 CARDIN 02 02 on 
5 CARDIN 02 Q3 ON 
6 ADRFIL 02 os ON 
7 MASTER 03 01 OFF 
8 ADRFIL 03 05 OFF 
9 ADRFIL 04 05 OFF 
10 CARDIN 05. 02 on 
1 MASTER 08 o1 ON 
12 ADRFIL os 05 ON 
13 MASTER 06 ol OFF 
CHAINING 


Chaining allows the programmer to make most effective use of his 
essentially non-sequential disc files (see the Chapter on DISC FILES 
in GE 120/130 RPG). ‘These files may be organized randomly or indexed- 
sequentially. A record on disc may be retrieved directly once its 
address is known thus allowing only those records that are necessary 
for processing to be retrieved. 


The technique of chaining differs from matching in two essential 
respects: 


@ it is meaningful only for multiple input files; 
@ it is designed primarily to provide a means of making the 
most effective use of disc files which are to be processed 


in a sequence other than that in which they are recorded. 


Essentially, the technique of chaining is the use of a field in a 
record of one file to retrieve records from an associated file. 


Chaining fields 


Data fields which either directly or through a standard conversion 
process, yield the address (where address is defined as according to 
the several methods of accessing disc records in GE 120/130 RPG) of an 
associated record on another file. 


Prom one to nine chaining fields may be specified in GE 120/130 RPG. 
Such chaining fields can be located in one or more files. 
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Using chaining fields 

Chaining fields can be located in one or more files. Such fields are 
designed for GE 120/130 RPG by- entering Cl through C9 in MATCHING FIELDS 
OR CHAINING FIELDS, columns 61-62, of the Input Specifications Form. 


An example of the use of chaining specification 


Figure 13,E illustrates the specifications and data for the © 
use of chaining. Discussion folloys the example. 


€& 100 Senses REPORT PROGRAM GENERATOR (NPLIT SPECIFICATIONS 
es GE Azai30 


————— Eee 


Feta 


pee 
ay 


T 
T 
T 
T 
i 
REPORT PROGRAM GENERATOR 
GE 120/430 


FIGURE 13.E CHAINING EXAMPLE oO 
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In the above example there is one primary file, CARDIN, the remaining 
files are chained to it. 


If a record of sequence AA is read on CARDIN which has a customer 
number of X and a paxt number of Y, the records with a customer 
number of X on MASTER and ADRFIL will be read. The record with a 
part number of Y on PRTICST will be read before detail time calcula- 
tions and thus at that point resulting indicators 01, 02, 05 and 06 
will be on. 


If a record of sequence BB is read on CARDIN, with customer number X 
the records on MASTER and ADRFIL with that customer number will be 
read so that at detail time calculation the indicators that will be 
on are 03, 01 and 05, x 
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XIV, — APPENDICES 


A. DIAGNOSTIC MESSAGES 
Diagnostic messages are produced by; 


The RPG Control Card Scan 
Source Scans 

Overflow Scans 

Assign Constant Program 
Assign Indicator Program 
The Input Genezator 


coeeoee 


Source Scans and the Input Generator produce note numbers which 
identify erroz3. Text for all notes is printed in the Diagnostic 
phases. The sxplanation for notes used is given below for each pro- 
gram which prepaves diagnostics. Overflow Scans do not assign note 
numbers associated with specifications but produce messages describing 
the error encountezed. 


1. Error messages printed by the contro] card scan 


STERLING CURRENCY INDICATOR ERROR - BLANK (NO STERLING) ASSUMED. 


PUNCTUATION CHARACTER FOR PRINT ERROR - STANDARD USE OF DECIMAL 
ASSUMED. 


TRANSLATION CHARACTER ERROR - BLANK ASSUMED {NO TRANSLATION) . 
START ADDRESS OBJECT PROGRAM ERROR - BLANK ASSUMED, RPG ASSIGNS. 
SEARCH INDICATOR ERROR - BLANK ASSUMED . 

PROGRAM ID EXROR - RPGOBT USED. 

PUNCH CONNECTOR CODE INVALID - CONNECTOR CODE 40 ASSUMED. 


WORK UNIT 1 OR WORK UNIT 2 TRACK INDICATOR ERROR - BLANK ASSUMED 
(9 TRACK TAPE), 


APS LISTING CHARACIER INVALID - BLANK ASSUMED (NO APS LISTING 
PRINTED) . 


WORK UNIT 1 OR WORK UNIT 2 IS INITIALIZED INCORRECTLY. COMPILATION 
XS TERMINATED. 


INVALID FORM TYPE (COLUMN 6). 


COMPILATION IS TERMINATED, 
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Error notes printed by the file description scan 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


ool 


002 


003 


004 


005 


006 


007 


008 


009 


010 


oll 


012 


013 


014 


015 


o1l6 


017 


FILE TYPE (COLUMN 15) IS INVALID. SPECIFICATION IS NOT 
PROCESSED, 


INVALID ENTRY IN COLUMNS 28, 31, OR 32. SPECIFICATION 
IS NOT PROCESSED, 


RECORD ADDRESS OR KEY FIELD (COLUMNS 29-30) HAS INVALID 
LENGTH, IS MISSING OR IS NOT RIGHT-JUSTIFIED. SPECIFI- 
CATION NOT PROCESSED. 


MORE THAN ONE RECORD ADDRESS FILE IS PRESENT. SUCCEEDING 
ONES ARE NOT PROCESSED. 


WARNING ~ PRIMARY FILE IS NOT SPECIFIED. FIRST SECONDARY 
FILE IS ASSUMED PRIMARY. 


INPUT FILE DESIGNATION (COLUMN 16) IS INVALID OR MISSING. 
S IS ASSUMED. 


MORE THAN ONE FILE IS ASSIGNED TO THE CARD READER. 
SPECIFICATION IS NOT PROCESSED, 


OVERFLOW INDICATOR (COLUMNS 33-34) IS INVALID, ENTRY OF 
OF IS ASSUMED, 


MORE THAN ONE PRIMARY FILE IS SPECIFIED. FILE IS ASSUMED 
TO BE A SECONDARY FILE. 


MODE OF PROCESSING (COLUMN 28) IS INVALID. ENTRY OF R 
IS ASSUMED. 


FILE NAME (COLUMNS 7-14) IS MULTI-DEFINED. SPECIFICATION 
Is NOT PROCESSED, 


TYPE OF FILE ORGANIZATION (COLUMN 32) IS NOT BLANK. 
ENTRY OF BLANK IS ASSUMED, 


END-OPF-FILE CODE (COLUMN 17) IS INVALID. ENTRY OF BLANK 
IS ASSUMED, 


SEQUENCE (COLUMN 18) IS INVALID. ENTRY OF BLANK IS 
ASSUMED. 


MODE OF PROCESSING (COLUMN 28) IS NOT BLANK, ENTRY OF 
BLANK IS ASSUMED. 


RECORD ADDRESS TYPE (COLUMN 31) IS NOT BLANK,: ENTRY OF 
BLANK IS ASSUMED. 


EXTENSION CODE (COLUMN 39) IS INVALID OR MISSING, ENTRY 


OF E IS ASSUMED, FOR TABLE, RECORD ADDRESS OR CHAINED 
FILES, OTHERWISE ENTRY OF BLANK IS ASSUMED. 
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NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE. 


018 


019 


020 


oal 


022 


023 


024 


025 


026 


027 


028 


029 


055 


056 


057 


058 


059 


065 
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FILE FORMAT (COLUMN 19) IS INVALID. ENTRY OF v IS 
ASSUMED. 


BLOCK LENGTH (COLUMNS 20-23) IS MISSING, INVALID, LESS 
THAN THE RECORD LENGTH, OR NOT RIGHT-JUSTIFIED. SPECI- 
FICATION IS NOT PROCESSED. 


RECORD LENGTH (COLUMNS 24-27) IS MISSING, INVALID, OR 
NOT RIGHT-JUSTIFIED. SPECIFICATION IS NOT PROCESSED. 


FILENAME (COLUMNS 7-14) Is MISSING, INVALID, OR NOT 
RIGHT-JUSTIFIED. SPECLFICATION iS NOT PROCESSED. 


QUTPUT FILE DESIGNATION (COLUMN 16) IS NOT BLANK. ENTRY 
OF BLANK IS ASSUMED. 


PROGRAM EXCEEDS LIMIT OF TEN VALID FILE NAMES. ADDI- 
TIONAL FILE DESCRIPTION SPECIFICATIONS WILL BE TREATED 
AS COMMENTS. 


KEY FIELD STARTING LOCATION.(COLUMNS 35-38) IS INVALID, 
NOT REIGHT-JUSTIFIED, OR NOT LESS THAN RECORD LENGTH. 


‘ SPECIFICATION, IS NOT PROCESSED. 


DEVICE (COLUMNS 40-46) Is INVALID. SPECIFICATION IS NOT 
PROCESSED. 


UNIT OR ALTERNATE UNIT (COLUMNS 47 AND 48) Is INVALID. 
SPECIFICATION IS NOT PROCESSED. 


*LABELS* (COLUMN 53) IS INVALID. ENTRY OF S IS ASSUMED. 


NAME OF LABEL EXIT (COLUMNS 54-59) IS MISSING, INVALID, 
OR NOT LEFT-JUSTIFIED. SPECIFICATION IS NOT PROCESSED. 


NO PRIMARY OR SECONDARY FILES SPECIFIED. EXECUTION IS 
DELETED, 


OVERFLOW INDICATOR (COLUMNS 33-34) IS APPLICABLE TO 
PRINTER FILES ONLY. ENTRY OF BLANKS ASSUMED. 


INVALID ENTRY IN COLUMN 66. ENTRY IS IGNORED. 


KEY LENGTH INVALID OR MISSING. SPECIFICATION IS NOT 
PROCESSED. 


INVALID ENTRY IN ONE OR MORE OF COLUMNS 61-65 AND 67-69. 
SPECIFICATION IS NOT PROCESSED. 


XEY LENGTH GREATER THAN RECORD LENGTH. SPECIFICATION 
Is NOT PROCESSED. 


REWIND. OPTION IS IMPROPERLY SPECIFIED FOR A TAPE FILE. 
AN ENTRY OF U IS ASSUMED. 


XIV-3 


3. 


NOTE 


NOTE 


NOTE 


GE 120/130 RPG USER'S GUIDE 
DIAGNOSTIC MESSAGES 


030 FORM TYPE (COLUMN 6) IS INVALID OR OUT OF ORDER. 
EXECUTION 1S DELETED, 


201 FILE DESCRIPTION SPECIFICATIONS ARE MISSING. EXECUTION 
IS DELETED, 


204 WARNING - PILE EXTENSION SPECIFICATION IS MISSING. 


Error ‘notes printed by the file extension scan 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


031 “FROM FILENAME* (COLUMNS 11-18) IS NOT SPECIFIED AS ON 
PILE DESCRIPTION SPECIFICATION. SPECIFICATION IS NOT 
PROCESSED. 


033 LENGTH OF. TABLE ENTRY (COLUMNS 40-42 OR 52-54) EXCEEDS 
256 CHARACTERS FOR AN ALPHAMERIC FIELD. ENTRY OF 256 
IS ASSUMED. 


034 CHAINING FIELD {COLUMNS 9-10) IS MISSING, OR INVALID. 
SPECIFICATION IS NOT PROCESSED. 


035 TABLE SIZE SPECIFICATION INVALID FOR BLOCK LENGTH, IF 
INPUT TABLE, NO DATA IS TRANSFERRED, IF OUTPUT FILE, 
FILE IS NOT PROCESSED, 


036 *TO FILENAME* (COLUMNS 19-26) IS NOT SPECIFIED AS ON 
PILE DESCRIPTION SPECIFICATION. SPECIFICATION IS NOT 
PROCESSED. 


037 470 FILENAME* (COLUMNS 19-26) IS NOT SPECIFIED AS A 
CHAINED FILE ON PILE DESCRIPTION SPECIPICATION. SPECI- 
FICATION IS NOT PROCESSED, 


038 LENGTH OF TABLE ENTRY (COLUMNS 40-42 OR 52-54) EXCEEDS 
15 DIGITS FOR A NUMERIC FIELD. ENTRY OF 15 IS ASSUMED. 


039 CONVERSION ROUTINE (COLUMNS 27-32) IS MISSING, INVALID, 
OR NOP LEFT-JUSTIFIED. SPECIFICATION IS NOT PROCESSED. 


040 *T0 FILENAME* (COLUMNS 19-26) IS NOT SPECIFIED AS A 
PRIMARY OR SECONDARY FILE ON FILE DESCRIPTION SPECIFI- 
CATION, SPECIFICATION IS NOT PROCESSED. 


oar TABLE SEQUENCE (COLUMNS 45 OR 57) IS INVALID. ENTRY OF 
BLANK IS ASSUMED, 


042 TABLE NAME (COLUMNS 27-32 OR 46-51) IS MULTI-DEFINED. 
SPECIFICATION IS NOT PROCESSED. 


043 *T0 FILENAME* (COLUMNS 19-26) IS NOT SPECIFIED AS ON 


FILE DESCRIPTION SPECIFICATION. ENTRY OF BLANKS IS 
ASSUMED. 


XIV-4 
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NOTE 


NOTE 
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*TO FILENAME* (COLUMNS 19-26) IS NOT SPECIFIED AS AN 
OUTPUT FILE ON PILE DESCRIPTION SPECIFICATION. ENTRY 
OF BLANKS IS ASSUMED. 


TABLE NAME (COLUMNS 27-32 OR 46-51) IS MESSING OR NOT 
LEFT-JUSTIFIED, SPECIFICATION IS NOT PROCESSED. 


LETTERS *TAB* ARE MISSING IN TABLE NAME (COLUMNS 27~29 
OR 46-48). ENTRY OF *“TAB* IS ASSUMED. 


NUMBER OF TABLE ENTRIES PER RECORD (COLUMNS 33-35) IS 
MISSING, INVALID, OR NOT RIGHT-JUSTIFIED. SPECIFICATION 
IS NOT PROCESSED. 


NUMBER OF TABLE ENTRIES PER TABLE (COLUMNS 36-39) IS 
MISSING, INVALID, OR NOT RIGHT-JUSTIFIED, SPECIFICATION 
IS NOT PROCESSED. 


*LENGTH OF TABLE* ENTRY (COLUMNS 40-42 OR 52-54) IS 
MISSING, INVALID, OR NOT RIGHT-JUSTIFIED. SPECIFICATION 
IS NOT PROCESSED, 


*PACKED* (COLUMN 43 OR 55) IS INVALID. ENTRY OF BLANK 
IS ASSUMED. 


*DECIMAL POSITIONS* (COLUMN 44 OR 56) IS INVALID. ENTRY 
OF ZERO IS ASSUMED. 


RECORD SEQUENCE OF THE CHAINING FILE (COLUMNS 7-8) IS 
INVALID. BOTH POSITIONS MUST BE EITHER NUMERIC OR 
ALPHABETIC, SPECIFICATION IS NOT PROCESSED. 


FORM TYPE (COLUMN 6) IS INVALID, SPECIFICATION 1S NOT 
PROCESSED. 


Error notes printed by the input scan 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


030 


101 


103 


104 


106 


107 


FORM TYPE (COLUMN 6) IS INVALID. SPECIFICATION IS NOT 
PROCESSED. 


*FROM* (COLUMNS 44=47) OR *TO* (COLUMNS 48-51) IS ZERO. 
ENTRY OF 1 IS ASSUMED. 


A STERLING FIELD MUST HAVE AT LEAST 1 POUNDS POSITION 
AND NO MORE THAN 9 POUNDS POSITIONS. FROM POSITION IS 
ADJUSTED TO TRUNCATE OR ADD POSITIONS. 


WARNING ~ INDICATOR 00 SHOULD BE USED ONLY IN OUTPUT 
SPECIFICATIONS. 


STERLING INPUT SPECIFICATION IS INVALID. BSI FORMAT IS 
ASSUMED. 


STERLING FIELD IS SPECIFIED AS PACKED FORMAT. UNPACKED 
FORMAT IS ASSUMED. 
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NOTE 
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FIELD DESCRIPTION SPECIFICATION SHOULD CONTAIN BLANKS IN 
COLUMNS 7-42. ENTRY OF BLANKS 1S ASSUMED, 


UNDEFINED FILENAME. SPECIFICATION IS NOT PROCESSED. 


FILENAME HAS BEEN PREVIOUSLY DEFINED AS A TABLE, RECORD 
ADDRESS OR OUTPUT FILE TYPE. SPECIFICATION IS NOT PRO- 
CESSED. 


*AND* SPECIFICATION (COLUMNS 14-16) IS OUT OF SEQUENCE —- 
I.E., FIRST INPUT SPECIFICATION OR FOLLOWING INVALID 
FILE NAME. SPECIFICATION IS NOT PROCESSED. 


THERE ARE NO RECORD IDENTIFICATION CODES {COLUMNS 21-41) 
IN THE CARD BEFORE AN *AND* CARD OR ON THE *AND* CARD. 
SPECIFICATION IS NOT PROCESSED, 


*OR* SPECIFICATION (COLUMNS 14-15) IS OUT OF SEQUENCE - 
I.E., FIRST INPUT SPECIFICATION / FOLLOWS FIELD NAME / 
FOLLOWS INVALID *OR*, AND *AND*, OR FILE NAME. SPECIFi- 
CATION IS NOT PROCESSED. 


DUPLICATE FILE NAME ON INPUT SPECIFICATION SECOND GROUP 
NOT PROCESSED. PROCESSING STARTS AT NEXT VALID FIELD 
NAME, 


FILE AND FIELD NAMES ARE BOTH PRESENT ON THE SAME SPECI- 
FICATION. FILENAME IS ASSUMED. 


SEQUENCE (COLUMNS 15-16) IS BLANK OR FIRST CHARACTER IS 
ALPHA AND SECOND CHARACTER IS NUMERIC. ENTRY OF AA IS 
ASSUMED. 


ALPHAMERIC SEQUENCE FOUND AFTER NUMERTC SEQUENCE OR 
DESCENDING NUMERIC SEQUENCE FOUND, NUMERIC SEQUENCE 
EQUAL TO PREVIOUS NUMERIC SEQUENCE IS ASSUMED. 


NUMERIC SEQUENCE IS NOT CONSECUTIVELY ASCENDING. CONSE~ 
CUTIVE SEQUENCE ASSUMED. 


NUMBER (COLUMN 17) IS NOT N OR 1, AND NUMERIC SEQUENCE 
IS FOUND. ENTRY OF N IS ASSUMED. 


OPTION (COLUMN 18) IS NOT 0 OR BLANK. ENTRY OF 0 IS 
ASSUMED. 


RESULTING INDICATOR IS BLANK OR INVALID. INDICATOR OF 99 
IS ASSUMED. 
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*POSITION* (COLUMNS 21-24, 28-31, OR 35-38) *FROM* 
(COLUMNS 44-47) OR *TO* (COLUMNS 48-51) CONTAINS EMBEDDED 
BLANK OR IS NOT NUMERIC. ENTRY OF ZERO IS ASSUMED FOR 
EMBEDDED BLANK OR NON-NUMBRIC CHARACTER. RIGHT-JUSTIFLED 
BLANKS ARE IGNORED. 


WARNING + FIELDS WITH SAME NAME OF DIFFERENT SIZES OR 
WITH DIFFERENT DECIMAL POSITION LENGTHS ARE SPECIFIED. 
FIRST DEFINITION IS USED. 


*NOT* (COLUMNS 25, 32, OR 39) IS NOT BLANK ORN, ENTRY 
OF N IS ASSUMED. 


*C/2/D* (COLUMNS 26, 33, OR 40) IS NOP C, Z, ORD. ENTRY 
OF C IS ASSUMED. 


RECORD IDENTIFICATION IS OUT OF SEQUENCE - I.E., FIRST 
INPUT SPECIFICATION OR FOLLOWING AN INVALID *OR*, *AND*, 
OR FILE NAME. SPECIFICATION IS NOT PROCESSED. 


INVALID CARD. CARD IS IGNORED. 


*FROM* (COLUMNS 44-47) OR *TO* (COLUMNS 48-51) IS BLANK. 
ENTRY OF ] IS ASSUMED. 


‘CHAINED FILE CANNOT HAVE CONTROL LEVEL INDICATORS OR 
MATCHING FIELDS. CONTROL LEVEL AND MATCHING IGNORED, 


*FROM* (COLUMNS 44-47) SHOULD BE LESS THAN OR EQUAL TO 
*TO* (COLUMNS 48-51), FIELD LENGTH OF 1 IS ASSUMED, 


DECIMAL POSITION (COLUMN 52) IS NOT NUMERIC. ENTRY OF 
“ZERO IS ASSUMED. a 


EITHER AN UNPACKED NUMERIC FIELD IS MORE THAN 15 BYTES 
LONG, OR A PACKED. NUMERIC FIELD IS GREATER THAN 8 BYTES 
LONG. LENGTH OF 15 IS ASSUMED FOR UNPACKED NUMERIC 
FIELD. LENGTH OF:8 IS ASSUMED FOR PACKED NUMERIC FIELD. 


STERLING FIELD IS INDICATED WITH MORE THAN THREE DECIMAL 
POSITIONS, THE DECIMAL PORTION OF THE.FIELD IS TRUNCATED 
TO THREE POSITIONS. THE *TO* POSITION OF THE FIELD IS 
ALTERED TO ALLOW FOR THIS TRUNCATION. 


PACKED INDICATOR (COLUMN 43) IS NEITHER BLANK NOR P, 
ENTRY OF P IS ASSUMED. 


CONTROL LEVEL DOES NOT START WITH L IN COLUMN 59 (L IS 
ASSUMED), OR COLUMN 60 IS NOT NUMERIC (1 IS ASSUMED). 


MATCHING/CHAINING FIELD (COLUMN 61) IS NOT C ORM (M IS 


ASSUMED), OR COLUMN 62 IS NOT NUMERIC OR IS ZERO {1 IS 
ASSUMED). 
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143 
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INDICATOR LO IS SPECIFIED AS A FIELD INDICATOR BUT IS 
NOT ALLOWED. INDICATOR IS IGNORED. 


ALPHAMERIC PIELD LENGTH IS GREATER THAN 256, LENGTH OF 
256 IS ASSUMED. 


NUMERIC RESULTING INDICATOR (COLUMNS 65-66 OR 67-68) IS 
SPECIFIED FOR AN ALPHAMERIC FIELD, INDICATOR IS SET OFF. 


IMPROPER ENTRY FOR STERLING COLUMNS. NORMAL POSITION IS 
ASSUMED. 


STERLING SPECIFIED IN COLUMNS 71-74, BUT NOT SPECIFIED 


“ON PROCESSOR CONTROL CARD, ENTRY OF BLANKS IS ASSUMED, 


THE SUM OF THE LENGTHS OF THE MATCHING FIELDS EXCEEDS 
256 OCTETS - 256 IS ASSUMED. 


AN *OR* TYPE SPECIFICATION SHOULD CONTAIN BLANKS IN 
COLUMNS 16-18, 42, ENTRY OF BLANKS IS ASSUMED. 


FIELD INDICATOR IS SPECIFIED BUT IS NOT VALID. INDICATOR 
IS NOT PROCESSED. 


COLUMNS 17-20 AND 42 OR *AND* TYPE INPUT SPECIFICATION 
MUST BE BLANK. ENTRY OF BLANK IS ASSUMED. 


WARNING ~ MULTI-FILE PROGRAM (WITH PRIMARY AND SECONDARY 
FILES} IS SPECIFIED WITHOUT MATCHING FIELDS. 


THE LENGTHS OF EACH MATCHING FIELD ARE NOT CONSTANT. 
FIRST LENGTH IS USED. 


KEY FIELD CANNOT BE DEFINED FOR THIS FILE. SPECIFICA- 
TION IS NOT PROCESSED. 


KEY *T0* POSITION (COLUMNS 48-51} OUTSIDE KEY AREA. THE 
FIELD Is TRUNCATED. 


*K* MUST PRECEDE NUMERIC NON-ZERO VALUES. SPECIFICATION 
Is NOT PROCESSED. » 


MATCHING SPECIFIED FOR A FILE THAT IS NOT PRIMARY OR 
SECONDARY. MATCHING IGNORED. 


THE LENGTHS OF THE CONTROL LEVEL FIELDS ARE NOT CONSTANT 
WITHIN EACH RECORD TYPE. FIRST LENGTH IS USED. 


BOTH *FROM* AND *T0* FIELDS MUST HAVE *K* SPECIFIED. 
SPECIFICATION IS NOT PROCESSED. 


THE SUM OF THE SPLIT CONTROL LEVEL FIELDS IS GREATER 
THAN 256. 256 IS ASSUMED, 
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Error notes printed by the calculation scan 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


070 


O71 


072 


073 


074 


075 


078 


079 


080 


082 


083 


084 


085 


086 


087 


088 


089 


FIELD TYPE IS INVALID FOR THIS OPERATION. SPECIFICATION 
IS NOT PROCESSED. 


DETAIL CALCULATION SPECIFICATION FOLLOWS A TOTAL CALCU 


LATION SPECIFICATION. 


PROCESSED. 


DETAIL SPECIFICATION IS NOT 


UNDEFINED TABLE SPECIFIED IN LOKUP OPERATION, SPECIFI- 
CATION IS NOT PROCESSED. 


KEYCV AND ERPGC ARE VALID ONLY WHEN PRECEDED BY EXTCV OR 
RPGCV. SPECIFICATION IS NOT PROCESSED. 


RPGCV IS NOT FOLLOWED BY ERPGCV OPERATION. ERPGCV IS 


GENERATED. 


WARNING - FIELD NAME IS DEFINED WITH NO ASSOCIATED 
LENGTH. LENGTH OF 8 IS ASSIGNED, DECIMAL POSITIONS is 
ASSUMED TO BE ZERO. 


DECIMAL POSITION IS INVALID. ENTRY OF ZERO IS ASSUMED 


FOR NUMEREC FIELD. 


ALPHAMERIC FIELD. 


ENTRY OF BLANK IS ASSUMED FOR 


CONVERSION NAME CANNOT BE USED TO DEFINE A FIELD, 
SPECIFICATION IS NOT PROCESSED. 


FIELD INDICATOR IS SPECIFIED BUT IS NOT VALID, INDICATOR 
IS NOT PROCESSED. 


*MVR* DOES NOT FOLLOW *DIV* OR FOLLOWS *DIV* WITH HALF- 


ADJUST SPECIFIED. 


SPECIFICATION IS NOT PROCESSED. 


FIELD LENGTH IS IMPROPERLY SPECIFIED OR IS NOT SPECIFIED. 
ENTRY OF ZERO IS ASSUMED FOR INVALID CHARACTER. WHEN 
REQUIRED LENGTH IS NOT SPECIFIED, ENTRY OF 8 IS ASSUMED. 


RESULT FIELD OF EXTCV OR RPGCV DOES NOT HAVE A LENGTH OF 
8. SPECIFICATION IS NOT PROCESSED. 


RESULT FIELD LENGTH {COLUMNS 49-51) IS GREATER THAN 
ALLOWED. A LENGTH OF 256 IS ASSUMED FOR AN ALPHAMERIC 
FIELD. A LENGTH OF 15 IS ASSUMED FOR A NUMERIC FIELD. 


OPERATION CODE (COLUMNS 28-32) IS INVALID OR MISSING. 
SPECIFICATION IS NOT PROCESSED. 


REQUIRED ENTRY IN FACTOR 1 (COLUMNS 18-27) IS MISSING OR 
INVALID. SPECIFICATION IS NOT PROCESSED. 


REQUIRED ENTRY IN FACTOR 2 (COLUMNS 33-42) IS MISSING OR 
INVALID. SPECIFICATION iS NOT PROCESSED. 


REQUIRED ENTRY IN RESULT FIELD {COLUMNS 43-48) IS MISSING 
SPECIFICATION iS NOT PROCESSED. 


OR INVALID. 
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FORM TYPE (COLUMN 6) IS INVALID. SPECIFICATION IS NOT 
PROCESSED, 


*NOT* (COLUMNS 9, 12, OR 15) IS NOT N OR BLANK. ENTRY 
OF N IS ASSUMED. 


CONTROL LEVEL IS IMPROPERLY SPECIFIED. ENTRY OF LO iS 
ASSUMED, 


RESULTING INDICATOR IS INVALID. INDICATOR IS NOT PRO- 
CESSED. 


PLUS AND/OR MINUS RESULTING INDICATORS (COLUMNS 54-55 OR 
56-57) ARE NOT ALLOWED FOR TESTING ALPHAMERIC FIELDS, 
INDICATORS ARE IGNORED. 


FIELD LENGTHS ARE INVALID FOR THIS OPBRATION, SPECIFI- 
CATION IS NOT PROCESSED. 


*HALF ADJUST* ENTRY (COLUMN 53) IS INVALID. ENTRY OF H 
IS ASSUMED. 


FIELD NAME IS IMPROPERLY USED, SPECIFICATION IS NOT 
PROCESSED. 


INDICATOR (COLUMNS 10-11, 13-14, OR 16-17) IS INVALID. 
ENTRY OF 00 IS ASSUMED. 


REQUIRED RESULTING INDICATOR (COLUMNS 54-55, 56-57, OR 
58-59) IS NOT SPECIFIED. SPECIFICATION IS NOT PROCESSED. 


WARNING - FIELDS WITH SAME NAME OF DIFFERENT SIZES OR 
WITH DIFFERENT DECIMAL POSITION LENGTHS ARE SPECIFIED. 
FIRST DEFINITION IS USED. 


Error notes printed by the output scan 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


NOTE 


090 


134 


160 


161 


162 


163 


FORM TYPE (COLUMN 6) IS INVALID. SPECIFICATION IS NOT 
PROCESSED. 


REQUIRED *ADD* ENTRY (COLUMNS 16-18) IS MISSING. *ADD* 
IS ASSUMED. 


PILENAME (COLUMNS 7-14) IS MISSING, OR RECORD TYPE 
(COLUMN 15) IS IN WRONG ORDER. SPECIFICATION IS NOT 
PROCESSED. 


CORRESPONDING FILENAME (COLUMNS 7-14) CANNOT BE DETER“ 
MINED. SPECIFICATION IS NOT PROCESSED, 


*STACKER SELECT* (COLUMN 16) IS INVALID. ENTRY OF 1 
IS ASSUMED, 


*SPACE BEFORE* (COLUMN 17) IS INVALID. ENTRY OF 1 IS 
ASSUMED. 
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*SPACE AFTER* (COLUMN 18) IS INVALID. ENTRY OF 1 IS 
ASSUMED. 


*SKIP BEFORE* (COLUMNS 19-20) IS INVALID. ENTRY OF 01 
IS ASSUMED. 


*SKIP AFTER* (COLUMNS 21-22) IS INVALID. ENTRY OF Ol IS 
ASSUMED. 


RECORD TYPE (COLUMN 15} IS NOT H, D, ORT. SPECIFICA= 
TION IS NOT PROCESSED. 


COLUMNS 17-22 MUST BE BLANK FOR *AND* TYPE SPECIFICATIONS. 
ENTRY OF BLANK IS ASSUMED. 


COLUMNS 7-13 MUST BE BLANK FOR *AND* OR *OR* TYPE 
SPECIFICATIONS. ENTRY OF BLANK IS ASSUMED. 


CORRESPONDING RECORD SPECIFICATION IS MISSING OR INVALID. 
SPECIFICATION IS NOT PROCESSED. 


*ZERO SUPPRESS* (COLUMN 38) IS INVALID. ENTRY OF BLANK 
Is ASSUMED. 


*PACKED FIELD* (COLUMN 44} I§ INVALID. ENTRY OF BLANK 
IS ASSUMED. 


FIELD NAME (COLUMN 32-37) IS NOT LEFT-JUSTIFIED. SPECI- 
FICATION IS NOT PROCESSED, 


*END POSITION* (COLUMNS 40-43) IS INVALID OR MISSING. 
SPECIFICATION IS NOT PROCESSED. 


LEADING OR CLOSING APOSTROPHE (') IN EDIT WORD IS NOT 
CORRECT. ENTRY OF BLANKS IN COLUMNS 45-70 IS ASSUMED. 


*BLANK AFTER* (COLUMN 39) IS INVALID. ENTRY OF BLANK IS 
ASSUMED. 


PUNCH AND PRINT FUNCTIONS ARE SPECIFIED FOR THE SAME © 
FILE, ENTRY OF BLANKS IS ASSUMED FOR COLUMNS 17-22. 


ZERO SUPPRESSION (COLUMN 38) MAY NOT BE SPECIFIED FOR 
CONSTANTS OR EDIT WORDS. ENTRY OF BLANK IN COLUMN 38 a 
IS ASSUMED. 


FIELD NAME (COLUMNS 32-37) IS UNDEFINED. SPECIFICATION 
IS NOT PROCESSED, 

WARNING - *BLANK AFTER* (COLUMN 39) IS SPECIFIED FOR 
CONSTANT, ALL IDENTICAL CONSTANTS WILL BE BLANKED. 


*PACKED FIELD* (COLUMN 44) MAY NOT BE SPECIFIED WITH 


CONSTANT, EDIT WORD OR STERLING ENTRY. ENTRY OF BLANK 
IN COLUMN 44 IS ASSUMED. 
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EDIT WORD (COLUMNS 45-70) CONTAINS NO DIGIT POSITIONS OR 
MORE THAN FIFTEEN (SIXTEEN FOR STERLING). ENTRY OF 
BLANKS IN COLUMNS 45-70 IS ASSUMED, 


LEADING OR CLOSING APOSTROPHE (') IN CONSTANT IS NOT 
CORRECT, SPECIFICATION IS NOT PROCESSED, 


*AND* OR *OR* FOLLOWING A FIELD NAME SPECIFICATION OR AS 


FIRST OUTPUT SPECIFICATION IS INVALID. SPECIFICATION IS 
NOT PROCESSED, 


STERLING ENTRY (COLUMNS 71-74) MAY NOT BE SPECIFIED WITH 
CONSTANT OR PAGE(N). ENTRY OF BLANK IN COLUMNS 71-74 IS 
ASSUMED. 


OUTPUT INDICATOR (COLUMNS 24-25, 27-28, OR 30-31) Is 
INVALID OR UNDEFINED. ENTRY OF LO IS ASSUMED. 


OUTPUT INDICATORS. SHOULD START IN COLUMNS 23-25, THEN 
26-28, AND FINALLY 29-31, ENTRY IS SHIFTED LEFT. 


*NOT* (COLUMNS 23, 26, OR 29) IS NOT BLANK ORN. ENTRY 
OF N IS ASSUMED. 


WARNING - OVERFLOW INDICATOR IS SPECIFIED IN *AND* TYPE 
SPECIFICATION. RECORD WILL NOT BE PUT OUT AS OVERFLOW 
LINE. ° 


DECIMAL POSITIONS MUST BE ZERO FOR PAGE(N) FIELD, ENTRY 
OF ZERO IS ASSUMED. 


SPECIFICATION TYPE CANNOT BE DETERMINED, RECORD AND 
FIELD DEFINITIONS ARE SPECIFIED IN SAME LINE OR BOTH ARE 
BLANK. SPECIFICATION IS NOT PROCESSED, 

NO OUTPUT INDICATOR (COLUMNS 24-25, 27-28, OR 30-31) IS 
SPECIFIED FOR *AND* OR *OR* TYPE SPECIFICATION. SPECI- 
FICATION IS NOT PROCESSED. 

INVALID END OF FILE ENCOUNTERED. 


*ADD* (COLUMNS 16-18) IS INVALID FOR FILE WITHOUT ADDI- 
TIONS. SPECIFICATION IS IGNORED. 


KEY FIELD CANNOT BE DEFINED FOR THIS FILE. SPECIFICATION 
IS NOT PROCESSED. 


END POSITION FOR KEY FIELD (COLUMNS 40-43) Is INVALID. 
SPECIFICATION IS NOT PROCESSED. 


RESULTING ENDICATOR IS INVALID OR UNDEFINED. ENTRY OF 
LO IS ASSUMED. 


FIELD NAME IS UNDEFINED. FIELD’ IS PROCESSED WITH 
ASSUMED LENGTH OF 004, 
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FILE SPECIFIED ON OUTPUT FORMAT SPECIFICATIONS IS UNDE- 
FINED OR NOT AN OUTPUT FILE (U, C, OR 0). ENTIRE FILE 
IS DELETED FROM PROCESSING. 


NO VALID OUTPUT SPECIFICATIONS ARE PRESENT. EXECUTION 
Is INVALID. 


ALL OUTPUT LINES OF A PRINTER FILE MUST INDICATE SPACING 
AND/OR SKIPPING. SINGLE SPACING IS ASSUMED FOR ALL 
OUTPUT LINES OF NAMED FILE WHICH HAVE NO PRINT FUNCTION. 


STACKER SELECT MAY NOT BE SPECIFIED WITH PRINT FILE. 
STACKER SELECT IS IGNORED AND SINGLE SPACING IS ASSUMED 
FOR ALL LINES OF NAMED PILE. 


PRINT OR PUNCH FUNCTION MAY NOT BE SPECIFIED FOR AN 
OUTPUT RECORD OF TAPE OR DISC FILE. STACKER SELECT, 
SPACING, OR SKIPPING IS IGNORED. 


PRINT FUNCTION MAY NOT BE SPECIFIED FOR OUTPUT RECORD OF 
PUNCH FILE. SPACE AND SKIP ENTRIES ARE IGNORED. 


IMPROPER USE OF PACKING OR ZERO SUPPRESSION ON ALPHA- 
MERIC OR PACKED FIELD. ENTRY OF BLANK 1S ASSUMED FOR 
INVALID CODE. 


END POSITION SPECIFIED FOR THE FIELD IS GREATER THAN THE 
RECORD LENGTH. ALL OR PART OF THE FIELD IS LOST, START- 
ING FROM RIGHTMOST POSITION. 


END POSITION IS LESS THAN THE FIELD LENGTH. SPECIFICA— 
TION IS NOP PROCESSED. 


FIELD TO BE EDITED TS GREATER THAN THE EDIT WORD. RIGHT- 
MOST DIGITS WILL BE LOST. 


PIELD TO BE EDITED IS NOT NUMERIC. NO EDITING IS PER~ 
FORMED. 


STERLING IS SPECIFIED FOR ALPHAMERIC FIELD. STERLING IS 
IGNORED. 


STERLING SIGN POSITION IS SPECIFIED AS OTHER THAN NORMAL 
FOR PRINTED LINE. NORMAL POSITION IS ASSUMED. 


LOCATION FOR STERLING SIGN EXCEEDS RECORD LENGTH. 
NORMAL POSITION FOR SIGN IS ASSUMED. 


STERLING FIELDS MAY BE EDITED ONLY FOR PRINT FILES. NO 
EDITING IS PERFORMED. 
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Error messages printed by the overflow input scan 


FIELD NAME DETECTED IN OVERFLOW INPUT SCAN DOES NOT AGREE WITH 
PREVIOUS DEFINITION, FIRST DEFINITION IS ASSUMED. 


Error messages printed by the overflow calculation scan 


FIELD NAME DEFINED AS BOTH LABEL AND FIELD NAME, FIRST OCCURRENCE 
ASSUMED TO BE VALID, CALCULATION SCAN. 


FIELDNAME DOES NOT AGREE WITH FIRST DEFINITION. FIRST DEFINITION IS 
ASSUMED. CALCULATION SCAN, 


Error messages printed by. the overflow output scan 


FIELDNAME NOT DEFINED IN INPUT OR CALCULATION SPECIFICATION, ALPHA- 
MERIC FIELD OF LENGTH 4 ASSUMED. 


Error messages printed by the assign constant program 


ALTSEQ DEFINED AS INVALID FIELD NAME, 


Error messages printed by the assign.indicators program 


INDICATOR REFERENCED AND UNDEFINED OR UNREFERENCED AND DEFINED: 
INDICATOR LIST. 


Error note printed by the input generator program 


NOTE 067 INPUT SPECIFICATION OMITTED FOR FILE DESCRIPTION EXECU- 
TION IS INVALID, 


Error notes for which.no message is assigned: 

NOTE 000 NO ERROR MESSAGE ASSIGNED FOR THIS NOTE. 
NOTE 030 NO ERROR MESSAGE ASSIGNED FOR THIS NOTE. 
NOTE 032 NO ERROR MESSAGE ASSIGNED FOR THIS NOTE. 


NOTE 053 NO ERROR MESSAGE ASSIGNED FOR THIS NOTE. 
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Sterling input information is represented as shown in the table below: 
ec 


Founds At least 1 but no more than | At least 1 but no more than 
9 positions 9 positions 


Shillings | 1 position BSI or | 2 positions (contents not 
GE to exceed 19) 
BSI or 
GE 
1 position BSI or | 1 position -BSI or 
GE GE 


face | 


Formats 


a. BSI format 
1) Shillings 


The shillings field is a single column. amounts of up to 
9s. are represented by punches 0...9. A 12-punch represents 
the amount of 10s. A combination of a 12~punch with a - 
1...9 punch represents the amounts of 1lis...19s. In the 
standard GE Card Code, these combinations represent graphic:, 
characters A...I. 


2) Pence 


fhe pence field is'a single column. Punches 0...9 are used 
to represent amounts of 0D...9d. Ten pence is: represented 
by a 12-punch, elevenpence by an ll-punch. 


b. GE format 
3) Shillings 
This field consists of two columns. The first column is 


reserved for the tens (i.e., it contains either 0 or 1), 
and the second for the units (digits 0...9), 
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2) ‘Pence 
Similar to the pence field for BSI format. It is a single 
column and punches 0...9 are used to represent the amounts 


Od...9d. However, tenpence is represented by an 1l-punch, 
eleven=pence is represented by a 12-punch. 


Leading zeros 
In sterling input fields, leading zeros can be represented by blanks. 


Signs 

In the absence of decimal fractions of a penny, the zone punch identi- 
fying the sign is placed in the units position of the pounds field. 
Otherwise, the sign punch is placed in the rightmost decimal position. 
The sign of a zero result field is always plus. Signs are coded as 
follows: 


= (minus) 1l-punch 
+ (plus) 12-punch or blank 


Specifying sterling fields 
a. The RPG control card 


Columns 17. through 20 of the RPG Control Card are used to 
specify the notation, BSI or GE, used for. sterling fields. 


b. Input specifications 


A sterling input field signed according to the conventions des- 
eribed above is defined by writing an § in position 74, 


Columns 71 to 74 are used to indicate the sign position of a 
sterling field not signed in the conventional manner. 


c. Output specifications 


For printing the letter S is written in column 74. For punching, 
the sign is specified as for input fields. 
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Conventions governing sterling fields 


® Shilling and penny amounts occupy two positions each on 
printed lines. Zero suppression applies to the tens position 
Of each field. 


® Edit words follow the same rules as those used in decimal 
Field editing, 


® Zero suppression may be used in the pounds field, in shillings 


if both pounds and shillings are zero, in pence if all three 
fields are zero. 


XIV-20 


GE 120/130 RPG ISER’S GUIDE 
120/130 RPG INTERFACES WITH SUPPORT SOFTWARE 


C. -120/130_RPG INTERFACES WITH SUPPORT SOFTWARE 


The 120/130 RPG system functions in the standard operating system 
environment. ‘That is, tape RPG functions under ETOS and disc RPG 
functions under EDOS. In addition, both tape and disc RPG produce 
object programs in standard APS format. There are, therefore, rules 
which must be observed by the RPG programmer to ensure that inter- 
faces between systems are properly performed. Such rules are based 
on conventions of use of the software systems and on the manner in 
which they operate. 


1. EOS 


The File Description Specification is used to prepare information for 
the EIOS routines. Therefore the parameters which appear in these 
specifications must conform to the rules describing data files. 

When parameters are incorrect RPG compilation may be invalidated in 
the assembly phase, or, execution may be incorrect. 


a. Conventions for tape files 
Block lengths must be an integral multiple of record lengths 
when fixed length records are used. When blocks are numbered 
the block size for fixed records must be a multiple of the 
record size plus 5 for the block number. 


Block lengths must be at least 20 characters for unnumbered 
blocks and at least 15 for numbered blocks. 


Variable length records must be within the allowed maximum of 
1023 characters. 


Block lengths must be within the allowed maximum of 28,000 char- 
acters, 


b. Conventions for disc files 


The block area for a disc file must be at least 75 characters in 
Length. 


The block area may have a maximum length of 5670 characters if 
8 bit mode is used. 


The block area may have a maximum length of 7680 characters if 
6 bit mode is used, 
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The block length must include: 
@ record code ~ 1 character 
® key length, if keys are present 


e@ length of chaining (record concatenation field) if 
present - 4 characters. 


The record length is always the effective data length. Thus, 
a record of 100 characters, with 15 character keys an@ a chain- 
ing field would require a block of 120 characters as a minimum, 
i.e., if a single record was placed in each block. 


APS. 


The RPG system generates statements in APS, subject to the rules of 
use of that language. The RPG system is responsible for producing 
code which conforms to APS rules. However, in the case of name 


generation there are certain conventions which the user must observe. 
Such conventions are described below. 


a. Field names in RPG and APS 


RPG users must observe the following rules in naming files and 
fields in RPG: 


@ All names must begin with any alphabetic character .. 
except the letter Y an@ must contain only alphameric:” 


characters. Special symbols and blanks must not appear: | 
within a name, : 


® A maximum of six characters may be used to name fields, 


@ Names must be unique. 


The use of APS as an assembly phase facilitates references 
between RPG programs and user subroutines. In order to ensure 
that the proper interfaces are generated, however, the user 


must write a ULABL statement for all names defined in subrou- 
tines and used in RPG. 


b. APS error flags 


Failure to observe the rules which govern interfacing between 

APS and RPG may giverise to errors in the APS phase of RPG genera- 
tion. Descriptive messages are produced in such cases. The RPG 
programmer must correct the source program to eliminate the 

exxror. Possible messages and the errors they indicate are des- 
cribed below, Such messages, which consist of a letter or 
decimal number, are printe@ to the left of the assembled state- 
ment when an APS listing is produced. When there is an assembly 
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without listing erroneous statements only are printed after 
compilation. In both cases the message: 


INVALID APS TRANSLATION 


is produced. No object program execution should be attempted 
in such cases. 


When a successful APS assembly has been performed the message: 
END OF APS TRANSLATION 


appears. Only when this message appears should object execution 
be attempted, 


Error messages in APS-ETOS - 


Error Flag Meaning 
D A name has been given a double definition. This 


can occur if a name appears in an RPG statement 
and in a user subroutine but does not appear in 
a@ ULABL statement. 


U A name is undefined. This can occur if a name 
appears in an RPG statement and a ULABL statement 
but is not defined in a user subroutine. 


Re No space is available to retain the name of the 
statement. This can occur when a large program 
with several hundreds of names must be assembled. 


rt The operand field of an instruction does not’ con- 
form to the APS conventions. 


P The format of some instruction does not conform 
to the APS conventions. 


L The length field of an instruction does not con- 
form to the APS conventions. 


oO The operation field of an instruction does not 
conform to the APS conventions. 


R A name has been given a multiple definition. 


N The name portion of an instruction does not con- 
form to the APS conventions, 


The user must correct the erroneous statement and recompile his 
program. If one of the above errors appears in a program gen- 


erated by RPG the listing should be given to the GE technical 
representative. 
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Meaning 


An error in the sequence of instructions. If 
this error appears in a sequence generated by 
RPG - not the RPG source - the listing should 
be given to the GE technical representative. 


An instruction was placed on an even boundary 
when ordinarily the field to be translated would 
have had an odd first location. No user action 
is required. 


The program requires more core than that indi~ 
cated as available at the start of translation. 
The .RPG card provides a field for indicating 
Machine size. No action is necessary unless the 
object machine is smaller than the dimension 
required by the generated program. In this 
latter case the program must be subdivided. 


A tape has been defined with unnumbered blocks 
and with records of fewer than 20 characters. 


A tape file has been defined with numbered blocks 
and with records of fewer than 15 characters. 


Incompatibility between the parity and recording 
mode specified for a tape file. 


Incompatibility between tape type and the density 
specified. 


Records specified as variable length are speci- 
fied as greater than 1023 characters in length. 


A block area less than 80 characters in length 
has been specified. 


A block area has been specified which is greater 
than the maximum allowed by EIOS. 


A block area defined for fixed length, numbered 
blocks has a length different from a multiple 
of the Work Area plus 5. 


A block area defined for fixed length, unnumbered 
blocks has a length which is not a multiple of 
the record length. 


The user must correct the structure of the data which is des- 
eribed in the File Description statements which produced the 
invalid APS statements. He must then prepare correct File 
Description Statements and recompile his RPG source program. 
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Error messages in APS-EDOS 
The alphabetic error messages for ETOS apply in EDOS as well. 
The numeric error messages which may appear are described below. 


All apply to FILE statements. 


Error Flag Meaning 
All PILE Statements 


o1 Error in File Name. 

02 FILE statement structurally incorrect. 
03 Error in key specification. 

04 Error in Address specification. 

05 Error in length field of a parameter. 
06 Some operand doubly defined, 

07 Device operand error. 

08 Invalid operand for file type. 

09 Require@ parameter not given. 

10 Register 6 or 7 used (these are reserved 


to the system) 


For Tape Files 


iL Block area less than 80 characters in 
length. 

12 Tape unit parameter erroneous. 

13 Alternate tape unit parameter erroneous. 

14 Retention period is greater than 999. 

15 Recording mode neither 6 nor 8° 

16 Work Area or Record Area not specified 


for a logical file. 


17 Work Area or Record Area specified for 
a physical file. 


18 Records of less than 20 characters 
specified for unnumbered blocks. 


19 Records of less than 15 characters 
specified for numbered blocks. 
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Error Flag Meaning 

20 Variable length record greater than 
1023 characters. 

21 Block length less than record length 
for unnumbered variable length blocks. 

22 Block length less than record length 
plus 5 for variable length numbered 
blocks. 

23 Block length not an integral multiple 


of record length for unnumbered blocks 
of fixed length records. 


24 Block length not a multiple of record 
length plus 5 for numbered blocks of 
fixed length records, 


25 Recording mode is 8; parity is even. 

26 Density error. 

27 Density error. 

28 Block length greater than 28,000 char- 
acters. 


For Printer Piles 


30 Neither fixed nor variable records 
specified. 


For Printer and 
Card Reader Files 


31 End of volume parameter missing. 
32 Block area parameter missing. 
33 Block length parameter missing. 


For Printer Files 


34 UN specified. 
For Card Reader 
Piles 
35 Block length greater. 
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Mea) i 


Variable length records less than 3 
characters or fixed length records less 
than 2 characters specified. 

Variable length records of more than 


163 characters or fixed length records 
ef more than 162 characters specified. 


No file type (VL, FL or UN) specified. 
Access’ Mode parameter error. 
Recording Mode parameter error. 

File Organization parameter error. 


Device or Alternate Device parameter 
error. 


File extensions parameter incorrect. 
Retention period greater than 999. 
Record search parameter error. 


File organization and record search 
incompatible. 


Register used as work area incompatible 
with file organization and access mode, 


Record search and key parameter speci- 
fications incompatible. 


Access Mode is random or mixed and an 
alternate device is given. 


Access Mode is sequential and file 
extensions are specified. Ae nes 


Random file specified as variable’. 
length. > 


Block area less than 75 characters. 
Block area greater than 5670 characters 


for 8 bit mode or Block area greater 
than 7680 characters for 6 bit mde. 
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Meaning 


Work Area or Record Area specified for 
UN file. 


Work Area or Record Area parameter 
missing. 


Record Area greater than block area for 
variable records. 


Fixed length records with record length 
less than 2 characters, 


Fixed length records greater than 4096 
characters. 


Block area not a multiple of fixed 
length record size, 


variable length record greater than 
1023 characters. 


Record less than 4 characters and 
vaxiable length. 


Sector number error. 


No verification requested for an update 
file. . 


End of Volume parameter given for random 
file. 


End of Volume parameter missing. 


Retention period given for an update 
file. 


Index area specified for sequential 
access. 


Index area specified for random access, 
Key area given for sequential access. 
Index area given without key, area, 

Key area given without key size. 


Key size given, access mode sequential 
but record insert method not chained. 


Key size greater than 255. 
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Meaning 


Key size greater than 38 for 6 bit mode 
or 
Key size qreater than 28 for 8 bit mode. 


An update file without record area. 
Record area given for a file not update 
oer record area but not record insertion 


method given for an update file. 


File organization sequential but record 
insert method is tracks, volume or page. 


File organization random, access mode 
mixed. 


Access mode is mixed or random no disc 
address given. 


Deck set-up under ETOS 


In order to compile and execute an RPG program on a tape system 
the following cards are required: 


1. 


Pilot 0 


= — Int [for at least 2 work tapes] 
LW Cards 


2. 


END 
«RPG Order Card 


BPG Source Cards: 


«APS Order Card 
«API Order Card 


«PRL Order Card 
END 


Pile Descriptions 

File Extensions 

Input Specifications 
Calculation Specifications 
Output-Format Specifications 
WEND 


following cards are optional: 


PEAPS 
APS Source Cards 


when used these cards follow the last 
Output-Pormat Specification Card and 
recede the KEND which marks the end of 
the RPG source program. 


Lc cards for files on tape. 
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Deck set-up under EDOS 


In order to compile and execute an RPG program on a disc system 
the following cards are required: 


1, Pilot 10 
DNA 
»INT with WD = 1 


2, «FPG Order Card 

3. RPG Source Cards: File Descriptions 
File Extensions 
Input Specifications 
Calculation Specifications 
Output-Format Specifications 
END 

4. APS Order Card with ID= 1, OD = SD 

5. API Order Card 


6. LOAD Order Card 
BEND 
The following cards are optional: 
1. WEAPS when used these cards follow the last 
APS Source Cards Output-Format Specification Card precede 
the WEND which marks the end of the RPG 
source program, 


2. IBC cards for files on disc. 
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D. REFERENCE TABLES 
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TYPE OF PILE 
ORGANIZATION 


MODE OF 
PROCESSING 


TYPE OF RECORD 
ADDRESS 


Column 32 Colum 31 


Meaning 


(not applicable) 


indexed= 
sequential 


indexed- 
sequential 


sequential 
in limits 


keys with access 
by means of the 
index cylinder 


indexed- 
sequential 


random keys with access 
by means of the 


index cylinder 


random 


absolute address 
with or without 
conversion 


keys and track 
addresses 


direct keys and track 
addresses; multi- 
ple search , 


. requested 


D direct keys and page 
addresses 
v sequential sequential (not applicable) 
file of 
absolute 


addresses* 


FIGURE 4.B VALID ENTRIES FOR FILE ORGANIZATION, 
MODE OF PROCESSING AND TYPE OF ADDRESS 


*aAbsolute address files referred to here are assumed always to be the 
output of a system Sort program. 
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PILE TYPE MODE OF TYPE OF FILE || FILE ADDITION|| RPG OBJECT 
PROCESSING ORGANIZATION PROCESSING 


Column 28 Column 32 Column 66 
Process the 


file and add 
new records 


Extend 
existing 


file 


Add new 
records to 
an existing 
file 


Process 
file, update 
records and 
add new 
records 


FIGURE 4.C VALID SPECIFICATIONS USING FILE ADDITION 


NOTE: The addition of records to an indexed-sequential file does not 
imply the updating of the file index. This must be done by a 
utility program. 


*For files to be updated the record(s) to be added must be identified as 
a different record type from the record(s) to be updated = even if they 
are, in effect, the same. 
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FIGURE 7.D GE-100 SERIES CHARACTER SET/COLLATING SEQUENCE 
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Figure 11.A below illustrates the structure of physical records 
on tape. 


Pigure 11.8 illustrates the structure of logical records. 


Block 
Sequence 
Number Data 
Physical Logical Logical Logical 
Record Record Record Record 
(Block) 2 3 N 


FIGURE 11.A A PHYSICAL RECORD 


Data 
Fixed Length 
Logical Record 
Record 
Length 
Pield Data 


Variable Length 


Logical Record 


FIGURE 11.B LOGICAL RECORDS 
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FIGURE 13.8 SAMPLE INPUT DECK 
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SAMPLE RPG PROGRAMS 
Example program one - multiple control breaks 


The following program illustrates the use of specifications for: 


tape input 

recognition of record types 

multiple control levels for calculation 
editing 

detail printing 

total printing 


EXaMP1 is a program which reads a file of insurance data from tape, 
performs total calculations for several classes of data and prints 
detail and total information. 


Input consists of a file of records of three types. The first is a 
date card. The second is a listing card cantaining client name, 
address, account number, birth date and sex. 


The third record type contains insurance data for the account 1 type, 
premium, insurance value. 


For each account processed the following data is printed: 


Region 

City 

Account Number 

Name 

Sex 

Birth Date 

Type of Iiisurance 
Mode of Payment Code 
Insurance Value 
Premium 

Due and Unpaid Billing 


Figure 14.A is a sample detail page. 


The RPG specification forms used are shown below: 
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File description form 


The two files used by EXAMP1 are described on the File Descrip- 
tion Form. 


The first, INSMSTR is described as follows: 
® an input file ~ I in column 15, file type. 
@ a primary file - P in colum 16, file designation. 


@ used to indicate end of job - E in column 17, end of 
file, 


@ made up of fixed format records - F in column 19, file 
format. 


@ records are 80 characters long and unblocked - 90 in 


block length, columns 20-23 and record length, columns 
24-27. 


© input is from tape - TAPE in columns 40-46, device. 


@ the tape unit used is 1 + 1 in columns 47-52, symbolic 
device. 


@ labels are standard - S$ in column 53, labels. 

@ blocks are not numbered - N in column 61, block count, 
The second, LIST is described as follows: 

@ an output file - 0 in column 15, file type. 

@ a secondary file - blank in column 16, file designation. 


@ made up of fixed length records - F in column 19, file 
format. 


© records are 132 characters long - 132 in block size and 
record size. 


® conditioned by the use of the overflow indicator (OF in 
columns 23-24, 


@ a printer file - PRINTER in columns 40-46, device. 
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Input form 


The first record described for the input file has an alphameric 
sequence - ND in columns 15-16, sequence. There is 1 and only 
1 such xecord in a record group - 1 in column 17, number. The 
record is identified by the presence of: 


® an A in position 7; 

@ the digit 4 in position 8; 

@ the zone for a B in position 9; 
@ the zone for a K in position 10; 
e@ the zone for a Z in position 11; 
@ the zone for a 1 in position 12. 


All such values must be present to identify the record when it 
is read. (Record identification codes, columns 21-41.) 


When the record described on lines 010 and 620 is read resulting 
indicator 99 is turned@ on and 


positions 1 and 2 are moved to TYEAR; 
positions 3 and 4 are moved to TMONTH; 
positions 5 and 6 are moved to TDAY. 


All of these fields are numeric - 0 in column 52, decimal posi- 
tions. 


The second record type is identified by the presence of a 1 in 
position 9. There is 1 and only 1 such record in a record 
group. When the record is read 3 control level indicatoxs are 
turned on - columns 59 and 60, control level, 


There are three matching fields used to sequence records of 
this type ~ M3, M2, Mi in columns 61-62 on lines 070, 080, 090. 


NOTE: Region is the primary matching field. It occupies the 
most significant (leftmost) positions in the field created 
by joining the three fields region, city and account 
number to form a single matching field. 


Record type 3, identified by the presence of a 2 in position 9 
may appear many times in a record group - N in column 17,-number. 
The same fields, region, city and state, are used for control 
fields. 
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Calculation form 


There are two groups of calculations. The first are carried out 
at detail time, that is, every time a detail record is read. 

The second group are total calculations conditioned by control 
levels associated with the fields described in the input speci~ 
fication. All calculations in this program are additions = the 
program performs total processing on the categories of informa- 
tion designated as control fields. 
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Output-format forms 


Three headings are printed on the output listing.- The first 
heading line printed for the first page or when the overflow 
condition occurs contains the words Account Listing, as shown 
in columns 45-70, Constant or Edit Word. Three spaces are 
taken after the heading is printed - 3 in column 18, space 
after. Before each such heading a skip is made to a new page - 
07 in columns 19-20, skip before. 


NOTE: A skip to a new page must always be requested by means of 
a skip to channel 07. Thus, for any line which is to 
appear on a new page there must be a 07 in columns 19 and 
20. 


The remaining two heading lines contain the text shown on lines 
05070-05170 and 05200-06040 respectively. 


In addition to the three headings there are detail lines printed 
for records read which set on indicator 02 - 02 in columns 24-25, 
output indicators. Two spaces are taken after each such line 
printed. The fields INS - line 140, PREM - line 150 and DNU - 
line 127 are edited for output. Zeros are suppressed, commas 
and decimal points are inserted. 


Four total lines are printed. The first three are conditioned 
by the control levels associated with categories of information 
read in from the record groups. The fourth is conditioned by 
the last record (LR) indicator which is turned on by the object 
program whenever the last input record for the program is 
detected. 
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F. PROGRAM LOGIC CHARTS 


@) 1. RPG compilation 


a. 


Narrative 


The RPG Compiler receives control from EDOS/ETOS when the 
latter has read the RPG Control Card. The control card is, 
therefore, in store fox processing by the Compiler. Infor- 
mation on the control card provides a configuration descrip- 
tion for use by the compiler in allocating store as well as 
data about the characteristics of the RPG program. 


The Compiler reads the source statements, diagnoses some error 
conditions, creates relative address references in symbolic 
form and puts out compressed forms of the source statements 
xead. The program which scans the File Description statements 


generates the first object instructions, FILE macros for tape 
and disc files, 


When all source statements have been read and compressed the 
work areas required are generated in the form of assembly 
language data reserves and constants. 


Compressed source statements are read and assembly language 
instructions generated to perform the processing they specify. 
A combination of generated sequences and pre-coded subroutines 
is used. The pre-coded subroutines are in symbolic form in 
the library. The generating sequences read in these routines 
and insert parameters for the program being compiled. 


At the end of the compilation a diagnostic program prints out 
descriptive text for all errors detected during processing. 


RPG gives control to EDOS/ETOS to bring in the APS card to 
initiate the APS assembly phase. 
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b. Flowchart 
ENTRY FROM EDOS/ETOS v INTERFACE/CONTROL 


CLFIL 


PERFORM 
NITIALI ZATION RPG CARD 
PROCESS DIAGNOSTICS 


CONTROL CARD 


SOURCE 
SPECIFICATIONS 
DIAGNOSTICS 


SCAN SOURCE 
SPECIFICATIONS 


SET UP 
DATA AREAS 
TABLES, 
CONSTANTS 


SET UP EAPS 
CODE FOR 
INPUT, 
CALCULATIONS , 

II 


SET.UP 
ERROR 
MESSAGES 


RETURN TO ETOS/EDOS 


TERMINATE 


THE OVERALL RPG COMPILER FLOWCHART 
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2. Object program flow 


a. Narrative Oo 


1) Segmentation 


The object program is segmented in 3 or 4 parts, according 
to the features used. A primary segment - the Segment 1 
box shown on the chart - is constituted from the file 
tables and input/output and other work areas used in the 
program. 


A second segment is set up to contain the object program 
proper - Segment 2, 


File OPENS and CLOSES as well as program initialization and 
end of job processing are contained in a third segment. 


O 


When there are no tables used these three segments suffice 
for the object processing. However, in programs that pro- 
cess tables a fourth segment must be added. This segment 
carries out table input and, where specified, table output. 
Flow through the object program proceeds as follows: 
Segment 1 is brought in and Segment 3. Segment 3 is exe-. 
cuted and, if table input is used, it brings in Segment 4. 
Segment 2 follows Segment 3 when no tables are specified. 

Seqment 4, where used, also calls Segment 2, oO 


Segment 2 calls Segment 3 at the end of processing. If no 
table output is specified Segment 3 returns control to the 
operating system, When table output must be processed 
Segment 3 calls Segment 4 which puts out table output and 
returns to the Operating System. 


2) Segment 2 processing flow (see charts below) 


° 


Boxes Description 


1 All calculations not conditioned by control levels - 
the detail time calculations - are carried out and 
indicators which are specified to reflect the status 
of such calculations are set. Processing continues 
with the initialization of a new processing cycle. 


2 At this time the 1P indicator is turned off. The 
appropriate overflow indicator is turned on if 
there was an overflow, otherwise overflow indica- 
tors are reset. Then the output of heading and 
detail lines is performed. Any heading or detail 
line that has no conditioning indicators will be 
written out on every cycle. 


oO 
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Description 


If an error halt indicator is set, the program 
inquires if the 1P indicator is on if so process= 
ing continues with detail calculations box 1, 
otherwise the program will terminate processing 
in the normal manner. 


The initialization switch is on initially for pro- 
grams with secondary files. In this case the ini- 
tialization routine reads records from the primary 
and each secondary file continuing to read a 
record from each file until either an end of file 
or a record with matching fields is detected. the 
initialization routine calls the get record sub- 
routine (box 5) and the record type identification 
and sequence checking routine (box 7} for all 
records. If a record with matching fields is. 
detected a file is considered initialized, the 
matching fields are moved to a work area and 
initialization is begun on the next secondary 
file. In this case, the coding to carry out the 
processing shown in boxes 9, 10 and 11 is not 
included and the initialization switch is off 
initially if there are no secondary files. 


The next input record is obtained from the file 
last processed. If an end of file was detected 
for this file, before or after the read, then 
entry is made to the end of processing detection 
routine, 


The Record Type identification subroutine transfers 
control to Detail Time calculations and sets the HO 
indicator to x'FO' if the record type was unidenti- 
fied. Otherwise record type sequence checking is 
performed, the proper resulting indicator is set 
and parameters for this record type are obtained 
for the remainder of this processing cycle. The 
HO indicator is set to X'Fl' if a record type 
Sequence error is detected. 


Box 12 is the end of processing detection routine, 
If there was an end of file for all E files indi- 
catoxrs L1~L9 and LR are set on and processing con~ 
tinues with the totals bypass switch (box 6). If 
an end of file for all E files (if no input file 
has an E all files are considered E files) is not 
detected during initialization entry to the record 
selection routine bypasses the moves of a matching 
field to the holding area. The non-initialization 
end of file entry to the record selection routine 
sets the file holding area to all F's (all zeros) 
if the primary file is in ascending (descending) 
sequence before proceeding with record selection. 
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Description 


If matching fields were present for this record 
type, collating sequence is checked (an out of 
sequence record sets HO to X'F2' for no record 
type sequence error and x'F3' for a record type 
sequence error). For no secondary files no 
record selection for processing is included. If 
there are secondary files the appropriate record 
is selected for processing, with the correct 
resulting indicator set, as well as the correct 
(as specified above) setting for the HO indicator 
and the pre-MR indicator is set, 


The record is checked for control breaks if con- 
trol fields are present. The appropriate control 
levei indicators LI-L9 are set. Total calcula- 
tions and output are bypassed completely on the 
first cycle, on the first cycle on which a control 
break is found all total calculations and output 
conditioned on indicator L1<L9 is not performed, 
all other total calculations (i.e., those calcula- 
tions conditioned on LO) and total output is 
however performed. The totals bypass switch is 
initially on. 


If an overflow condition is detected the appro- 
priate overflow indicator is set. 


If the last record has been processed and the 1P 
indicator is off all files are closed and process— 
ing is terminated. If the 1P indicator is on and 
the last record was processed the processing cycle 
continues with detail calculations. 


Overflow outputs totals time overflow first and 
then details time overflow. 

Input fields are moved from the input area to the 
internal names are setting appropriate field indi- 
cators. If chaining was specified the chained 
records are obtained and identified, and fields 
are moved to the input area at this time. This 
routine continues until all chained records spe- 
cified are obtained. 


The MR indicator is set according to the way it 


was preset in box 18. This box is not included 
if no secondary files were specified. 
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b. Flowcharts of RPG object program 


1) Segmentation 


START RPG 
PROGRAM 


SEGMENT 1 
FILE DEFINITIONS, 
WORK AREAS 
ENTRY YY27 
FILE OPENING AND 
INITIALIZATION 
ENTRY YY23 


TABLE INPUT 


SEGMENT 


SEGMENT 2 


RPG PROCESSING 
PROGRAM 


* ENTRY Y¥17 


FILE CLOSING AND 
END OF JOB 
PROCESSING 


ENTRY YY20 


THE OVERALL RPG PROCESSING CYCLE FLOW 
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i 2) Segment two processing logic object flow 


HEADING 
AND DETAIL 
TIME OUTPUT 


NITIALI ZATION 
ROUTINE 


ADENTIFICATION 
AND SEQUENCE 
CHECKING 


PROCESSING LOGIC (SEGMENT 2) 
(Part 1 of 2) 
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END OF FILE 
ENTRY FOR 


TOTAL TIME 
CALCULATIONS 


SET TOTALS 
BYPASS SWITCH 
OFF 


INDICATOR 


INPUT FIELD 
MOVES AND 
CHAINING 


yy16 


SET MR 
INDICATOR AS 
SPECIFIED IN 

RECORD SELECTION 

ROUTINE 


(Part 2 of 2) 
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PREREQUISITE AND RELATED READING 


CODE TITLE 


FA GE 120 Reference Manual 
RA GE 130 Reference Manual 
P-A ETOS Programmer's Manual 
P-A EDOS Programmer's Manual 
RRA ETOS Operator's Manual 

R-A EDOS Operator's Manual 

Rr-A DSS161 Subsystem Manual 


P-A APS Programmer's and 
Operator's Manual 


CODES: R - Related Reading 
P - Prexequisite Reading 
A - Analyst/Programmer 
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GLOSSARY 


Alphameric (alphanumeric) - Generic term for alphabetic letters, 


numerical digits, and special graphic characters which are machine- 
readable. 


Alphameric field - Any data field for which a decimal position speci- 
fication is not provided is regarded as alphameric, The contents may 
be alphabetic, numeric or alphameric. The meaning of alphameric in 
this sense is in the processing. Alphameric fields enter core store 
in unpacked format. 


Alphameric literal - Alphameric literals are composed of the graphic 
characters in the GE 120/130 set. They must be specified between 
apostrophes ('). 


Alphanumeric - Refers to a character set that contains both letters 
and digits, and, usually other characters, such as punctuation marks. 
(Synonymous with "alphameric".) 


Blank character - A character used to produce a space on an output 
medium. 


Blocking - Combining two or more records into one unit called a block. 


Chained file - A file read by means of pointers to specific records to 
be processed,: where such pointers are developed from fields in a 
pointer file called a chaining file. 


Chaining - The technique of using data in one file as a pointer to a 
specific record in another file as a means of reading data files 
selectively, in random access of desired information. Has meaning 
only for dise files. 


Chaining field - The field which links or chains a record of one file 
to a record in another file. 


Chaining file - A file which contains fields used as pointers to 
obtain records from associated files is called a chaining file. The 
fields which serve as pointers are called chaining fields. Chaining 
fields contain data which gives a means of addressing the associated 
file. The chaining field is most usually some data item prepared in 
a form that allows it.to be converted by a standard process to yield 
the address of the associated record. 


Chaining search ~ A technique for retrieving data from a file by 


using addresses in the records that link each record to the next in 
the chain. 


Control break - A term used to indicate that information in data 


fields used to comparisons has changed. A control break is used to 
condition processing. 
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Control field ~ A data field which contains information to be compared 
from record to record is a control field. A control field may be a 
composite of fields within the record. ‘There may be a number of 
control fields specified for a given RPG program. 


Control level - The relative importance of control fields within an 
RPG program is established by assigning them numbers called control 
levels. 


Data item ~- The term for a member of a set of data denoted by a data 
element. 


Dise storage ~ A storage device which uses magnetic recording on flat 
rotating discs. 


Indicators - Indicators are single character fields which have two 
values - on and off. They are used to reflect the status of some RPG 
field, the presence of some record or field, the result of a calcula- 
tion or table search. Therefore, they can be used to condition 
operations which depend on field status, result of a calculation etc. 


Label ~ One or more characters used to identify an item of data. 


Numeric data - Data represented by numerals and some special charac- 
ters. 


Numeric fields - When a decimal position specification is provided 
for some field that field is referred to as numeric. 


The contents of numeric fields enter core store in packed decimal 
format and should, therefore, contain only numeric characters with 
or without a sign over the rightmost position. 


Numeric literal ~ only the decimal symbol (.) and/or a plus or minus 
sign may appear in numeric literals in addition to the digits 0 
through 9. Numeric literals must not be written between apostrophes. 


Random (or direct) file organization - Data files are referred to as 
randomly (or directly) organized when the address of a record is 
retrieved by the use of its relationship to the record key. The 
relationship defining an address in terms of a key is established by 
the designer of the file, 


Random (or direct) file processing - In random (or direct) processing 
the sequence of processing is not related to the sequence in which 
data is stored in the file but proceeds according to the use pattern 
established in the application. , 
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24. Resulting indicators 


a) Definition - Indicators are defined as resulting indicators when 
they are specified as being used to indicate status of a field, 
presence of a record or the result of calculations. This is 
done by writing indicator specifications in the applicable 
resulting indicator positions on Input Specifications and Calcu- 
lation Specifications. Indicators are set or reset according to 
such specifications. 


b) Interrogation - Indicators are interrogated when they are used in 
the conditioning fields of calculation or output statements. The 
use of indicators to condition processing does not cause any 
setting or resetting. 
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Add, operation, VII-15, VII-32, VIII-4 
Alphameric field, I~4 

Alphameric field length, 1-4 
Alphameric literals, 1-4, VII-7 
Alternate collating sequence, II=3 
Alternating arguments and functions, VII-5 
Ampersand, edit word, VIII-17 

AND relationship, VI-21, VI-22 
Argument, V-8 is 

Arithmetic Operations, VII~15 

Asterisk protection, VEII-16 

Automatic skipping, VIII-8 


BLANK AFTER, VI-20, VIII-14 

BLOCK COUNT, IV-13 

BLOCK LENGTH, Iv-6 

Blocking records, VI-3 

Branching and Exit operations, VII-27, VII-34 
Branching or Go To, VII-27 

BSI format, Appendix B 


C/Z/D, VI-6, VI-24 

Calculations Specifications sheet, I[II-2, III-3, VII-1l 
Calculations, {-10 

Chaining, I-4, VI-6, XIZI-7 

CHAINING FIBLDS, I-4, V-2, VI-16, XIII-7 
Chaining files, 1-4, V-7, V-10, XIII-7 
CHARACTER, VI-6 

Combined file, Iv+3 

COMMENTS, V=7, VII-13 

Comments, *column, ITI-5 

COMPARE - EQUAL, VII-11 

COMPARE - HIGH, VII-11 

COMPARE = LOW,’ VII-11 

Compare operations, VII-23 

CONTD, VI-10, v-7 

Control break, I-5 

Control card, II-1-5 

Control fields, I-4 

CONTROL LEVEL, I-5, VI-13, vVII-2 
CONSTANT OR EDIT WORD, VIII-15 
Constants, VIII-16 

Conversion of chaining fields, VII-29 
Conversion Operation codes, VII~29 
Conversion routine, RAF, V-7 


Conversion Routine Operation codes, VII-29 
Conversion Routines Operations, VII-29 
CR symbol, edit word, VIII-18 


Data files, XI-1-7, XII-1-6 

Deck arrangement, Appendix C 

Decimal symbol location, VIzI-18 

DECIMAL POSITIONS - Calculation, VII-9, VII-10 
DECIMAL POSITIONS - File Extension, V-5, V-6 
DECIMAL POSITIONS - Input, VI-8, VI-24 
Defining indicators, I-6 

DENSITY, IV-14 

Describing a record, 1-7 

Detail records, VIII-3 

Detail calculation, I-8 

Detail records, I-11 

DEVICE, IV-ll 

Direct access non-sequential dise file, xiI-2 
Direct access sequential disc file, XII-2 
Direct organization, XII-2 

Disc files, XII-1 

Divide, operation, VII-17, VII~-37 

Dollar sign, $, VIII-18 


Edit words, VIII-16 

END OF FILE, IV-5 

END POSITION IN OUTPUT RECORD, VITI-15 
End of RPG conversion, VII-30 
ERPGC, VII-30 

EXICV, VIT~30 

EXTENSION CODE, Iv~11 

EXTENTS, IV-16 

External conversion routine, VII-30 
Exit operations, VII-27 

Exit to a user's subroutine, Ix-2 


PACTOR 1, VII-6, VII~14 

FACTOR 2, VII-8, VIT-14 

Pield description, I-7 

Field description, VI-1 

Field description, VIII-12 

Pield indicators, VIII~10- 

FIELD LENGTH, VII-8, VII~9 

FIELD LOCATION, VI~7, VI-8, VI-1O 
FIELD NAME =~ Input, VI-9, VI~24 
FIELD NAME - Output, VITI-13 


Y-2 


FIELD RECORD RELATION, VI-15, VI-17, VI-18 
File Addition, Iv-15, VIII-4 

File Descriptions, I-7 

File Description Specifications Sheet, III-lL, III-2, Ev-l 
FILE DESIGNATION, Iv-3 

File Extension Specifications Sheet, III-1, III-2, v-l 
FILE FORMAT, Iv-6 . 

File Label, XII-4, XII-S 

File organization, IV-16, XII-12 

FILE TYPE, IV-2 

FILENAME - File Description, IV~2, IV-20 
FILENAME - Input, VI-2, VI-22, VI-23 
FILENAME - OUTPUT, VIII~2 

Files, maximum number of, IV-19 
Pixed-length records, XII-1, XII-2 
Flowcharts, logic, Appendix F 

FORM TYPE, III-5, 

Forming tables, rules for, VII-44 

From: Field Location, vi-7 

FROM FILENAME, V-2, V-10 

Files updating, Iv-19 


GOTO, VII-28 


HALP-ADJUST, VII-10 

Halt indicators, VIII-l1 
Heading records, VIII-3 

HO indicator, IV-19, VI-3, VI-i4 


Indexed-sequential files, XII-2 
Indexed-sequential organization, XII-2 
Indicators, I-5 

INDICATORS, VI-4, VII-3 

Indicatox Operations, VII-26 

Input file, Iv-2 

Input record sequence, VI-3 

Input Specifications sheet, IITI-l, IfI-2, viI-l 
Inverted print, II-3 


KEYCV, VII-29 
Key field, VII-2 
KEY FIELD STARTING LOCATION, Iv-10 


Label exit, Iv-13 

Label for GOTO, VII-28 

Labeled dise file, xII-4 

Labeled magnetic tape file, XI-4-7 
LABELS, IV-12, Iv=23 

LENGTH OF KEY FIELD, Iv-9 

LENGTH OF RECORD ADDRESS FIELD, IV-9 
LENGTH OF TABLE ENTRY, V-4, V-6 
LEVEL, VI-12 

LINE NUMBER, ITI-4 

Logic flowcharts, Appendix F 
Logical records, XI-2, XII-1 
LOKUP, VII-12 


MATCHING FIELDS or CHAINING FIELDS, VI-14, VI-16 
Matching Record indicator, VIII-11 
MINUS - Calculations, VII-11 
MINUS - Input, VI-17, VI-19 
Minus zone, VII-24 
MOVE LEFT, VII-20 
MODE OF PROCESSING, IV-7, IV-17 
Move Operations, VII-19 
Move, VII-20 
High-to-High, VII-21 
High-to-Low, VII-21 
Low-to-High, VII=22 
Lew-to-Low, VII-21 
Move remainder, operation, VII~18 
MR indicator, VI~-14 
Multiple input files, XITI-1 
Multiply, Operation, VII-16 


NAME OF LABEL EXIT, Iv-12, Iv-13 

NOT, VI-6, VIII-8, VIII-9 

NUMBER, VI-3, VI-24 

NUMBER OF THE CHAINING FIELD, V-2 
Number of files allowed, 1V-19 

NUMBER OF TABLE ENTRIES PER RECORD, V-4 
NUMBER OF TABLE ENTRIES PER TABLE, V-4 
Numbering pages, VIII-13 

Numeric field, maximum length, 1-5 


OPERATION, VII-8 

OPTION, VI-4 

OR relationship, VI-10, VI-15, VI-18 

Output file, VIII-3 

Output-format specifications, III-2, Il1-3, VIII-2 
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OUTPUT INDICATORS, VIII~-8, VIII~-12 
Overflow, Iv-15 

OVERFLOW INDICATOR, IV-10, VIII-7 
Overflow indicator, VIII-11 
Overflow printing, VIII-7 


PACKED - Pile Extension, V-4, V-6 
PACKED - Input, VI-7 
PACKED PIELD - Output, VIII-15 
PAGE NUMBER, III-4, 
Page numbexing, VIII-13 
Parity, Iv-14 
Pence-format fields, Appendix B 
Physical unit, IV-11 
PLUS - Calculations, VII-11 
PLUS - Input, VI-17, VI-19 
POSITION, VI-S, VI-24 
Pound sterling formats, Appendix B 
Printing lines conditioned by overflow, VII-11 
PROCESSING 
detail I-8 
total 1-8 
Processing multiple input files, XIII-1-8 
PROGRAM IDENTIFICATION, III-5S 
Program logic, Appendix F 


Random processing, I-5, Iv-8 
Random processing, indexed-sequential file, XII-2, XII-3 
Record Addition, VIII-¢ 
RECORD ADDRESS FILE (RAF), IV-19, V-7, V-10, Iv-24 
RECORD ADDRESS TYPE, IV-9 
Record, description I-7 
Records 
detail I-11, VIII-3 
heading I-11, VIII-3 
total I-ll, VIII-3 
Record formats, XI-2, 
RECORD IDENTIFICATION CODES, VI-22, VI-24 
Record identification, VI-1 
Recording Mode, IV~15 
Record Key, IV-10 
RECORD LENGTH, IV-7 
RECORD SEQUENCE OF THE CHAINING FILE, V-1, V-10 
Records in an OR-relationship, VI-21 
RESULT FIELD, VII-S, VII-8, VII-9, VII-14 
RESULTING INDICATORS - Calculation, VII-11 
RESULTING INDICATOR ~ Input, VI-4, VI-24 
Retrieving updated tables, VII~45 
RLABL, IX-1,2 
RPG conversion, VII-29 
RPG Deck Arxangement, Appendix C 
RPG specification sheets, I-11 
Sample programs, Appendix D 
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Sequence checking of input files, IV-L9 
Sequence checking, matching fields, XITI~-2 
SEQUENCE - File Description, IV-6 
SEQUENCE - File Extension, V-5, V-6 
SEQUENCE = Input, Vi-2, VI-24 

Sequence of input records, XIII-4 
Sequential files - xII-2 

Sequential organization, IV-10 
Sequential processing, IV-7 

SETOP, VII~12, VII-26 

SETON, VII-12, VII-26 

SKIP-APTER, VIII-5 

SKIP-BEFORE, VIII-5 

STACKER SELECT - Input, VI-6 

STACKER SELECT ~ Output, VIII-4 

Sterling routines, II-2, II-3, Appendix B 
STERLING SIGN POSITION - Input, Vi~20 
STERLING SIGN POSITION - Output, VIII-18 
Subtract, operation, VII-15 

SYMBOLIC DEVICE, IV-11, IV-20 

Table entries length, V-11 

Table lookup, VII-27 

TABLE NAME, V-3 

TABLE NAME (Alternating table), V~5 

TAG, VII-28 

Tape Rewind, IVv-16 

Test Zone, VII~-24 

Testing or Compare operations, VII-23 
Testing the results of calculations, VII-l1i 
Testing for zero, plus, and minus, VII-11 
To, field location, VII-7 

0, FILENAME, v-3, V-8, V-10 

Total records, VIII-3 

Turning indicators ON or OFF, VII-26 

TYPE OF FILE ORGANIZATION, IV-10, IV-17, IV-23 
TYPE H/D/T, VIII~3 


ULABL, IX-1,2 

Use of field indicators, VI-17 
Use of registers, IX-3 

User's label, Ix-2 

Using indicators, I-6 


Variable-length records, XII~1, XII-2 
Volume Label, xXII-4 
Volumes IV-15 


wero and Add, operations, VII-15 
Zero and Subtract, operations, WII-16 
ZERO OR BLANK - Input, ‘VI-17, VI=20 
ZERO SUPPRESS, VIII-14 
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